









SPORTOWCY Z KOMPUTERA 


Dobrze resorowany autobus, stoliki i krzesła za¬ 
miast ławek, na stolikach komputery osobiste, 2 
przodu autokaru tablica Załogę klasy na koł¬ 
kach stanowi kierów ca-elektromechanik (trzeba 
przecież podłączyć klasę do wiejskiej sieci elek¬ 
trycznej lub uruchomić przenośny agregat) 1 in¬ 
struktor-informatyk Co stoi na przeszkodzie aby 
po polskich wsiach zaczęły jeździć takie kompute¬ 
rowe klasy na kołkach * — pytałem w tym miejscu 
dwa miesiące temu I oto z satysfakcją stwier¬ 
dzam, że nasza propozycja szybko znalazła społe¬ 
czny odzew. 

Otrzymaliśmy listy od nauczycieli 1 uczniów 
kilku szkół wiejskich, którzy gotowi są podjąć tą 
metodą naukę informatyki. W jednym przypadku 
otrzymaliśmy nawet plan szkolnego podwórka z 
zaznaczeniem, w którym miejscu można by nasz 
komputerowy autokar ustawić 1 jak podłączyć go 
do szkolnej sieci elektrycznej! 

Najważniejsze jednak, że zgłosił się sponsor de¬ 
klarujący gotowość zakupu 1 wyposażenia w 
sprzęt tego pierwszego komputerowego autobusu. 
Oto już po ukazaniu się tekstu przyszli do naszej 
redakcji koledzy Zbigniew Niemczynowicz i Alek¬ 
sy Misiejuk reprezentujący Zespoły Usługowo- 
-Wytwórcze Zarządu Krajowego Z MW „Agrotech- 
nika”. W naszym pomyśle „zakochali się od 
pierwszego wejrzenia”. W imieniu swojej firmy 
zadeklarowali natychmiastowe wyłożenie środ¬ 
ków finansowych i szybkie podjęcie prac organi¬ 
zacyjnych mających doprowadzić do szybkiego 
wyjechania, iv Polskę komputerowej „klasy na 
kółkach”. Dziękujemy za błyskawiczną reakcję' 

Warto przy okazji przypomnieć, że me pierwsza 
to już tak cenna społecznie inicjatywa „Agrotech- 
mki” w zakresie upowszechniania informatyki 
Niedawno informowaliśmy o ufundowaniu przez 
nią i przekazaniu do kół Z MW aż 50 komputerów 
osobistych. Tak trzymać, koledzy' Czekamy teraz 
na zgłoszenia kolejnych sponsorów (jeden autobus 
to zaledwie kropla w morzu potrzeb polskiej wsi) i 
na .. kolejne zgłoszenia szkól wiejskich Musimy 
przecież opracować optymalny przebieg naszej 
autokarowo-komputerowej linii. W wakacje już 
pewnie nie zdążymy jej uruchomić, ale 1 września 
jest datą całkiem realną' 

A propos wakacji i komputerów. Próbowałem 
kupić niedawno w „Polresie ” bilet z miejscówką, 
aby moc spokojnie wyjechać na kilka dni urlopu. 

I zalała mnie krew. Nie chodzi wcale o 3-godzinne 


czekanie w tropikalnym zaduchu źle wietrzonej 
sali na 1 piętrze Dworca Centralnego, naszego 
cuda techniki z drugiej połowy lat siedemdziesią¬ 
tych, Chodzi o to, że panienki z okienka w dal¬ 
szym ciągu, abym rnogł dostać rezerwację muszą 
łączyc się telefonicznie z jakąś panienką która ma 
prawdopodobnie na swym biurku listę wolnych 
miejscówek Czasami próba dodzwonienia się do 
tego „centralnego banku danych” trwała 1 40 mi¬ 
nut' 

Rezerwacja biletów jest najbardziej klasycznym 
ze wszystkich klasycznych miejsc, w których kom¬ 
puteryzację należy stosować w pierwszej kolejno¬ 
ści. Przykład ten powinien się znaleźć już w podrę¬ 
cznikach dla pierwszej klasy szkoły podstawowej, 
gdyż jego logika jest tak oczywista, ze nawet 7-la¬ 
tek zrozumie ją od razu. Dorosłym, jak się okazu¬ 
je, zrozumieć to trudniej 

Jak dotychczas komputerowy system rezerwacji 
miejsc wprowadził tylko LOT , gdyż inaczej auto¬ 
matycznie pozostałby na uboczu światowego sy¬ 
stemu komunikacji lotniczej. Mam nadzieję, że 
wobec takiej konieczności staną wkrótce 1 inni 
przewoźnicy, gdyż... szkoda gadać! 

I jeszcze jedna wakcicyjno-komputerowa uwa¬ 
ga. Znowu, jak w ubiegłym roku, zorganizowane 
zostanie w Polsce kilkaset obozów komputero¬ 
wych. Bardzo się z tego cieszymy, gdyż skoro tru¬ 
dno jest spotkać komputer w szkole, to dobrze 
chociaż, że można to zrobić w czasie wakacji Am¬ 
bicją każdego większego zakładu przemysłowego 
jest zorganizowanie przynajmniej jednego obozu 
czy też kolonii „komputerowej ”. I bardzo dobrze. 
Jesteśmy ostatnimi, którzy mieliby cokolwiek 
przeciwko takim ambicjom. Tylko apelujemy 
do uczestników i wychowawców — niech kompu¬ 
ter nie przesłoni Wam widoku z wakacyjnego na¬ 
miotu! 

Wakacje to przede wszystkim odpoczynek, za¬ 
bawa, sport. I komputery, oczywiście, ale obok, a 
nie zamiast zabawy na świeżym powietrzu W in¬ 
nym przypadku wychowamy pokolenie kompute¬ 
rowych cherlakóio. Rozwój intelektualny nie 
może odbywać się kosztem rozwoju fizycznego. 
Obie sfery powinny rozwijać się harmonijnie. Pa¬ 
miętajcie o tym, drodzy wychowawcy. 

Nasze wakacyjne hasło komputerowcy najlep¬ 
szymi sportowcami! Do biegu! Gotowi! Start' 

Waldemar Siwiński 
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Uśmiechnięte twarze twórców „BAJTKA” oglądających 
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osiągnięciem niebagatelnego sukcesu. Zespół redakcyj¬ 
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GRA O JUTRO 



Rozmowa 
z JERZYM DOMAŃSKIM, 

dyrektorem 
Warszawskiego 
Centrum Studenckiego 
Ruchu Naukowego. 

— Czytelnicy „Bajtka”, to, na ogol licealiści, 
bądź uczniowie szkol podstawowych, a stu¬ 
denci? Czytają „Komputer”, czy też w ogolę nie 
interesują się informatyką? 

— Na giełdach obok handlarzy dominują rzeczy¬ 
wiście 14-16-łatki. Czy oznacza to brak zaintereso¬ 
wania studentów informatyką 9 W pewnym stopniu 
tak Entuzjazmu dla niej na uczelniach raczej me 
widać Dla przykładu na Politechnice Warszawskiej 
wyróżnić można w zasadzie dwie grupy Jedna, to 
studenci wydziałów „nieelektronicznych Więk¬ 
szość z nich umie napisać prosty program w BA- 
SIC-u i niewiele ponadto Natomiast druga grupa, 
wśród której dominują studenci elektroniki, to w za¬ 
sadzie profesjonaliści Juz na studiach potrafią oni 


sprzedawać swoje umiejętności programowania i to 
za duże pieniądze 

— Czy właśnie brak powszechnego „entuz¬ 
jazmu komputerowego” był powodem tak póź¬ 
nego zajęcia się informatyką w Centrum? 

— Dopiero przed rokiem, gdy staliśmy się firmą 
ZSP na własnym rozrachunku uzyskaliśmy potenc¬ 
jalną moziiwosc zdobycia sprzętu W trzy miesiące 
później ruszyły juz kursy programowania w wypo¬ 
sażonej przez nas sali. Dziś pracownia komputero¬ 
wa zapewnia 50 proc obrotu całej firmy Prowadzi¬ 
my wspomniane kursy BASICA, PASCALA, C, As- 
semblera na komputerach IBM i AMSTRAD a także 
kursy obsługi IBM-ow Przede wszystkim jednak na 
zlecenie rożnych zakładów pracy organizujemy im 
systemy zarówno od strony sprzętowej jak i przede 
wszystkim softwareu 

— Znaleźliście zatem chętnych do jego 
opracowania? 

— Mieliśmy trochę szczęścia Ludzie którzy u 
nas pracują me mogą wprawdzie zarobić tyle, co w 
innych firmach — obowiązuje nas stawka 230 zł za 
godzinę pracy programisty — lecz widocznie podo¬ 
ba im się panująca tu fajna atmosfera, możliwość 


samodzielnego znajdowania i wykonywania atrak¬ 
cyjnych a jednocześnie pożytecznych prac 

— Jakie są ich efekty? 

— Myślę, ze me najgorsze porównując chocby 
z wynikami innych producentów oprogramowania 
Na targach „Intersoft" we Wrocławiu nasze pakiety 
były w każdej chwili do zaprezentowania na stois¬ 
ku W odróżnieniu od programów wielu innych zna¬ 
cznie głośniejszych firm, które po prostu „me cho¬ 
dzą”. W warszawskich Zakładach „Syrena musie¬ 
liśmy dla przykładu nsemal od początku przerabiać 
sprzedany im za naszym pośrednictwem pakiet fi¬ 
nansowo-księgowy produkcji najgłośniejszej aktual¬ 
nie w Polsce firmy softwarowej Teraz działa juz 
bez zarzutu Nauczeni jednak doświadczeniem 
sprzedajemy obecnie wyłącznie własne oprogra¬ 
mowanie. 

— I jest na nie popyt? 

— Oczywiście Powoli wszyscy zaczynają się 
juz orientować, ze komputera bez oprogramowania 
kupować me należy Często nasi kontrahenci za¬ 
mawiają najpierw programy, a dopiero przy ich od¬ 
biorze każą sobie dodać do nich komputer. Takie 
transakcje wiązane są zresztą dla nas najbardziej 
opłacalne — programy są wciąż jeszcze na naszym 
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rynku nieproporcjonalnie tanie w stosunku do ceny 
sprzętu i wyłącznie na nich trudno zarobić. 

Kto kupuje studenckie programy? 

— Wszyscy Najciekawszą współpracę nawiąza 
liśmy jednak ze spółdzielniami rolniczymi tworzą¬ 
cymi spółkę „Agrosoft Opracowujemy dla mej sy¬ 
stemy finansowo-księgowy, ewidencji materiało¬ 
wej i płac. Tworzenie ich me jest rzeczą łatwą bo¬ 
wiem w spółdzielczości rolniczej obowiązują inne 
mz w pozostałych jednostkach gospodarczych sy¬ 
stem ekonomiczno-finansowy Pracujemy także 
nad programami sc.s e rolniczym* 

— Proponujecie komputer zamiast traktora? 

— Nie można powiedzieć z góry, co jest waż¬ 
niejsze W spółdzielni powinno byc i jedno i drugie 
Gdy trzeba wybierać wówczas decydować musi ra¬ 
chunek spodziewanych zysków Nierzadko prze¬ 
mawiać on będzie na korzyść komputera Nas po¬ 
tencjalni klienci tez są o tym przekonani Mieliśmy 
juz zresztą możliwość zaprezentowania im pierw¬ 
szych wersji przyszłych programów na wspólnym 
spotkaniu w Karpaczu pod hasłem „narty i kompu¬ 
tery”. 

Narty miały być premią dia programi¬ 
stów? 

— Tylko takie możemy im zaproponować 
Wspomniałem juz, ze c; sposród studentów i mło¬ 


dych pracowników nauki, którzy są naprawdę do¬ 
brzy i wiedzą na co ich stać mogą w innych miej¬ 
scach zarobić wielokrotnie w ęcej 

— Czyżby studia stały się wreszcie opłacai- 
ną inwestycją? 

— Na takich wydziałach jak elektronika informa¬ 
tyka czy matematyka stosowana niewątpliwie tak 

przynajmniej w Warszaw e Najlepsi bez żadnych 
kombinacji zarobić mogą i 100 tys zł miesięcznie 
Ale tych naprawdę dobrych nie jest jeszcze zbyt 
dużo Mozę będzie ich więcej, gdy na studia trafią 
czytelnicy „Bajtka Tutaj, w Centrum zawsze 
mogą liczyc na to, ze znajdą warunki do podniesie¬ 
nia swoich umiejętności 

Zgoda, że to, jak przygotowani będą do 
pracy z komputerem młodzi ludzie trafiający na 
studia, zależy także od „Bajtka”. Ale i wy mogli¬ 
byście dołożyć swoją cegiełkę 

— Prowadzone u nas kursy programowania są 
otwarte także dla uczniów szkół średnich Poza tym 
myślimy poważnie o rozpoczęciu produkcji progra¬ 
mów edukacyjnych. Kłopot w tym, ze me wiadomo 
jeszcze na jaki komputer Przed rokiem z inicjatywy 
Rady Okręgowej ZSP w Warszawie spotkaliśmy się 
z dyrektorem Zrzeszenia „Mera Na tym spotka¬ 
niu ustaliliśmy, ze rozpoczniemy prace nad progra¬ 


mami dla szkół W ciągu dwóch, trzech tygodni 

otrzymać mieliśmy ze Zrzeszenia pierwsze dwa 
„Ewro 8 Junior I co 7 Minął rok, wciąż jesteś¬ 
my w kontakcie, ale Zrzeszenie samo jeszcze nie 
dysponuje nawet kilkoma egzemplarzami „Junio¬ 
rów Skompletowaliśmy zatem zespół, ułożyliśmy 
nawet scenariusz pracy i... czekamy. 

— Tylko czekacie? 

W tej sprawie sami wiele zrobsc nie możemy. 
Myślę jednak że połączonymi siłami rożnych nie¬ 
wielkich firm takich jak nasza, zatrudniających nie¬ 
mal samych młodych ludzi, przełamać będzie moż¬ 
na i w tej sprawie barierę niemożności. Zamierza¬ 
my zarejestrować nasze Centrum jako jednostkę 
innowacyjną natychmiast po tym, gdy tylko Sejm 
przyjmie odpowiednią ustawę Jesteśmy członkami 
powstałej niedawno Polskiej Izby Jednostek Inno¬ 
wacyjnych Jeśli okaże się, ze „komputer dla każ¬ 
dego wciąż pozostaje poza zainteresowaniem 
wielkich zakładów elektronicznych być może właś¬ 
nie jednostki innowacyjne przyczynią ssę do uru¬ 
chomienia jego produkcji Tak, czy inaczej z kom 
puterami juz się me rozstaniemy. 

Rozmawiał: 
Grzegorz Onichimowski 



Kilka lat temu grupa amerykańs¬ 
kich informatyków postanowiła udo¬ 
wodnić, że opieranie bankowości wy¬ 
łącznie na komputerach może skoń¬ 
czyć się katastrofą. Swój dowod prze¬ 
prowadzili w najprostszy sposób — 
włamali się nocą do sieci komputero¬ 
wej i zmienili zaprogramowany kurs 
dolara. Oczywiście bankierzy o całej 
operacji wiedzieli, bo gdyby podo¬ 
bnego wyczynu dokonał informatyk- 
■ przestępca nazajutrz dolar byłby tań¬ 
szy od śmieci. W naszym kraju takie 
włamanie jest absolutnie niemożliwe. 
Niestety, me świadczy to o wyższości 
naszych banków. Po prostu nie ist¬ 
nieje sieć, do której można by się wła¬ 
mać. 

O pożytkach płynących z zastosowania techniki 
komputerowej w bankach większa część świata prze¬ 
konała się juz dość dawno. Dziś sprawą zupełnie nor¬ 
malną jest to, ze dżentelmen posiadający konto na Wall 
Street pobiera (wpłaca, przelewa, odpisuje) pieniążki 
np na Alasce 

A u nas 7 Wybrałem srę do jednego z warszawskich 

banków o którym mówiono mi, ze , ma komputer”. 
Faktycznie „ma I to wszystko co można powedziec 
o skomputeryzowaniu tego oddziału. Pomijając fakt, że 
poczciwa MERA 9150 (tak, tak) akuratnie była zepsuta, 
jej pomoc jest prawie żadna Komputer spełnia tu rolę 
mechanicznego archiwisty, statystyka i głównego księ¬ 
gowego Zapisuje on wszystkie przeprowadzone w od¬ 
dziale operacje, które jednak wcześniej muszą być 
przygotowane przez pracownika „na piechotę 
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Jedyną zaletą jest zmniejszenie liczby pomyłek, bo 
komputer me da się łatwo oszukać i me przyj me np 
numeru me istniejącego konta bankowego No i obsłu¬ 
ga jest przyjemniejsza mz zwykłego liczydła czy tabu¬ 
latora — miękka klawiatura, ekran, który czasem zapi 
szczy, sympatycznie zamruga do kasjerki 

Na szczęście są w Warszawie banki, gdzie komputer 
wykonuje działania prawie takie same, jak jego „kole¬ 
dzy” z innych zakątków sw?ata Takie banki są dwa — 
przy ul Sienkiewicza i Rotunda Odwiedziłem ten dru¬ 
gi. 

W październiku 1979 roku Rotunda zaczęła na nowo 
funkcjonować po tragicznej eksplozji. I rzeczywiście 
oznaczało to dia tego oddziału „nowe Wówczas po 
raz pierwszy w naszym kraju do banku zawitał kompu¬ 
ter Zresztą w tej dziedzinie Rotunda do dziś jest od¬ 
działem wzorcowym Pracuje tu amerykański system 
MST, czyli Modulowany System Terminalowy, oparty 
na komputerach NCR-2500 Zdanie pracowników któ¬ 
rzy nie wyobrażają sobie pracy z liczydłem i stemplem 
w ręku (jak dawniej), sw adczy, ze jest on pożyteczny 

Konkretnie? System znakomicie zdaje egzamin przy 
operacjach dopisywania odsetek, dużych wypłatach z 
książeczek obiegowych oraz wymiany tych książeczek 
obiegowych W normalnym banku zabieg taki trwa oko 
ło dwóch tygodni, podczas gdy tutaj — pięć minut 

Jeżeli książeczka jest założona w Warszawie albo 
najbliższej okolicy, wystarczy wczytac” dane klienta, 
a komputer błyskawicznie informuje, czy taka książe¬ 
czka istnieje, podaje stan wkładu oraz dokonuje opera¬ 
cji wpłaty lub wypłaty określonej sumy Trwa to dwie- 
-trzy sekundy Zapis wykonywanej operacji kasjer 
otrzymuje na małej drukarce podczas kiedy inna wy¬ 
konuje zapis w książeczce Sprawa komplikuje się, gdy 
mamy do czynienia z książeczką założoną — pow e- 
dzmy — w Szczecinie Przypomina to komputerowe 
kasy biletowe,, gdzie otrzymujemy ślicznie wydrukowa¬ 
ny przez komputer bilet, ale pani wcześniej musi tele¬ 
fonicznie uzgodnić czy dane miejsce me jest zajęte. 
Tutaj kasjerka także chwyta za telefon i dzwoni do 


Szczecina, aby potwierdzić stan wkładów Nie dotyczy 
to sum bieżących do 50 tys złotych 

Kolejnym przykładem działania komputera bankiera 
jest prowadzenie kontroli tabel premiowych bonów 
oszczędnościowych Komputer ma zaprogramowaną 
treść wszystkich tabel i wprowadzenie symbolu dane¬ 
go bonu daje odpowiedz czy został on wylosowany, a 
jeżeli tak, to na jaką sumę Od chwili zatrudnienia przy 
tej czynności komputera nie zdarzyła się jeszcze ani 
jedna pomyłka z wypłacaniem premii 

Ogromnym uproszczeniem jest zwolnienie kasjerki z 
obowiązku prowadzenia całej buchalterii biurowej. Nie 
musi ona na osobnych kontrolkach notować wpłat za 
energię elektryczną, wodę gaz, psa i telewizor Kom¬ 
puter wszystkie operacje notuje na tzw kontrolce zbio¬ 
rczej i dostarcza w postaci wydruku Po zakończeniu 
pracy kasjerka musi jedynie policzyć pieniądze i uzgo¬ 
dnić posiadaną gotowkę z saldem, jakie powinna mieć 
na koniec dnia 

Aby pracować w Rotundzie przy klaw aturze kompu¬ 
tera należy przejść specjalne miesięczne przeszkole¬ 
nie i zdać wewnętrzny egzamin Taka specjalizacja wy¬ 
starczy Natomiast konserwacją, programowaniem i 
naprawą zajmują się specjaliści z Centrum Elektronicz¬ 
nego NBP Choć awaryjność systemu jest naprawdę 
nieznaczna i nie osiąga nawet jednego procenta w sto¬ 
sunku do obsługiwanych każdego dnia p ęciu tysięcy 
klientów 

Bankierzy z Rotundy mają więc pracę która dzięki 
komputerowi wcale me musi być nudnym „urzędole- 
niem , choc pewnie mają kolejne zyczeme — stworze¬ 
nie sieci komputerowej i przeprowadzanie na tym urzą¬ 
dzeniu wszystkich operacji Pocieszeniem może być 
fakt, ze inni dopiero od nich się uczą Na przykład kas¬ 
jerzy z X OM NBP PKO przy Placu Powstańców Właś¬ 
nie ten oddział stanie się pod koniec roku trzecim BIT- 
-bankiem Mozę jest to krok na drodze pełnej kompu¬ 
teryzacji polskiej bankowości? Odpowiedzieć mogą 
specjaliści z Departamentu Informatyk NBP 

Janusz Janiec 




Turbo PASCAL został, w 
stosunku do standardowej 
wersji PASCAL-a, wzboga¬ 
cony o nowe elementy, któ¬ 
rych zadaniem jest zapew¬ 
nienie użytkownikowi możli¬ 
wości tworzenia nowoczes¬ 
nego oprogramowania. 



PASCAL 


-1 COŚ JESZCZE- 

Zmiany i rozszerzenia języka w Turbo PASCAL-u 


KOMENTARZE 


STAŁE OPATRZONE TYPEM 


TYPY DANYCH 


Podobnie ak w wielu innych nowoczesnych kompilato¬ 
rach PASCAL-a, komentarze programu mogą służyć do 
przekazywania dodatkowych poleceń dotyczących same) 
kompilacji Komentarz taki powinien rozpoczynać się od 
znaku $, po którym następuje (me poprzedzone odstę 
pem) jednoliterowe oznaczenie polecenia, i ewentualnie 
parametr, którym najczęściej jest znak + lub Można 
umiescic w jednym komentarzu listę kilku takich dyrektyw 
oddzielonych przecinkami np 

{$R-,X + ,V-} 

Bodaj najistotniejszą z dostępnych dyrektyw kompilacji 
jest możliwość kompilowan a tekstu programu zawartego 
na rożnych plikach przy pomocy dyrektywy {$1} Jej para¬ 
metrem jest nazwa pliku z tekstem źródłowym. W momen¬ 
cie napotkania powyższego polecenia kompilator wczytuje 
żądany plik z dysku, a następnie kompiluje go — tak, jakby 
był integralną częścią programu zrodłowego. Umożliw a to 
oszczędną gospodarkę pamięcią komputera, tworzenie 
programów dłuższych niż objętość edytora i dodatkowo 
tworzenie np bibliotek procedur. Oto przykład użycia dy¬ 
rektywy I: 

program Wykres; 

($1 Procedury pas} 
begin 

{$1 Grafik, pas} 
end. 

Dyrektyw I me można zagmezdzac Oznacza to, ze dla 
danego programu wolno ich uzyc tylko w jednym z jego 
plików źródłowych 

A oto inne podstawowe dyrektywy kompilacji w Turbo 
PASCAL-u 

{$!-} — Odłączenie sygnalizacji błędów operacji wejs- 

cia/wyjscia W przypadku odłączenia błędy takie 
są sygnalizowane tylko przy pomocy funkcji 10- 
Result Nie należy mylić mniejszej dyrektywy z 
opisaną wyżej dyrektywą łączenia plików 
{$R + } — Włączenie sygnalizacji błędów przekroczenia 
zakresu indeksu w tablicy, przekroczenia zakresu 
dozwolonego przez typy zmiennych itp Przy op¬ 
cji wyłączonej program działa szybciej. 

{$V-} — Wyłączenie dokładnej kontroli zgodności ty 
pow zmiennych typu Stnng w deklaracjach i wy¬ 
wołaniach procedur Po wyłączeniu dozwolone 
jest użycie jako parametru typu String dowolnej 
zmiennej tego typu (bez względu na jej zadekla¬ 
rowana długość) 

{$U-ł-} — umożliwienie użytkownikowi przerwania wy¬ 
konania gotowego programu przy pomocy klawi¬ 
szy CTRL + C Program z włączoną opcją działa 
wolniej 

{$X-} — Wyłączenie opc i szybkiego dostępu do tablic 
Po wyłączeniu kompilator minimalizuje obszar 
pamięci zajmowany przez tablice, kosztem szyb¬ 
kości dostępu do ich elementów 

NAGŁÓWEK PROGRAMU 

Mozę zostać pominięty 

ETYKIETY 

Mogą mieć postać nie tylko liczb ak w PASCAL-u stan 
dardowym, lecz rowmez dowolnych identyfikatorów np 

label BladWeWy, 999; 

Etykiety są „w doczne” tylko w jednej jednostce progra¬ 
mowej Nie jest zatem możliwe wykonanie skoku (goto) 
np na zewnątrz procedury lub funkcji 

STAŁE 

Dostępne są dwie dodatkowe stałe standardowe 
Pi — Przybliżenie liczby Pi, dokładniej 
31415926536, 

Maxlnt — Maksymalna dostępna liczba 
całkowita = 32767 


Stałe opatrzone określeniem typu występują wyłącznie 
w jrbo PASCAL-u Ich użycie pozwala na pewne osz¬ 
czędności pamięci i umożliw a uzyc e jako stałych złożo¬ 
nych struktur danych np tablic Stałe standardowe są w 
kodzie wynikowym umieszczane w całości tyle razy iie 
razy nastąpi do nich odwołanie; stałe opatrzone ypem zaj¬ 
mują miejsce w pamięci tylko raz — w miejscu, w którym 
są definiowane 

Definicja takiej stałej ma postać podobną do poniższych 

const Tytuł: string [8] = ‘PRZEKRÓJ’; 
g : real = 9.81; 

Break: char = ’Q’; 

Stałe opatrzone typem są traktowane w programie tak 
jak zmienne (z nadaną wartością początkową). Z tego po¬ 
wodu me wolno ich używać w miejscach, w których war¬ 
tość stałej musi byc znana w czasie kompilacji, np w defi¬ 
nicjach typów Stałymi opatrzonymi typem mogą byc rów 
niez tablice, rekordy i zbiory Ze względu na konieczność 
określania typów, blok definicji stałych z typami wolno 
umiescic po definicjach typów programu (procedury, funk¬ 
cji) Na przykład 

type Stan = (Działa, NieDziala, Zepsuty); 

Komunikaty = array [Stan] of string [11]; 

Punkt = record 

X,Y : real; 
end; 

const CoJest: Komunikaty = 

(DZIAŁA,'NIEDZIALA’, 
KONSERWACJA’); 

Początek: Punkt = (X:0.0, Y:0 0); 

Samogłoski: set of ’A’..’Z’ = 

[’A’,’E’,T,’0’,’U’,’Y’]; 


W Turbo PASCAL-u wprowadzono nowe standardowe 
typy danych 

byte — zdefiniowany jako O 255, 
string — opisany osobno poniżej 
W odróżnieniu od standardowego PASCAL-a, Turbo po¬ 
zwala na zamianę wartości w zasadzie dowolnego typu 
prostego na inny typ prosty (wyjątkiem jest tylko typ real) 
Dokonuje się tego, używając identyfikatora typu jako funk¬ 
cji konwersji Np w odniesieniu do poniższych typów 
type Kierunek = (N, E, S, W); 

Wielkie = ’A’..’Z’; 
zachodzą rownosc 

Integer (N) = O 

Kierunek (3) = W 
Wielkie (15) = ’0’ 

Wielkie (N) = A’ 

oraz np 

Char (55) = ’7’ 

Integer (’N’) = 78 

W celu konwersji na typ integer można zawsze użyć 
znanej juz funkcji ord 

Ord (S) - 2 
Ord ( N’) = 78 

LICZBY CAŁKOWITE 


Możliwe jest używanie liczb całkowitych w zapisie szes¬ 
nastkowym Zapis liczby należy w tym przypadku poprze¬ 
dzić znakiem $, np 

Adres: = $1F00; 

Dopuszczalnym zakresem liczb całkowitych w zapisie 
szesnastkowym jest $0000 $FFFF 
Oprócz zwykłych działań arytmetycznych Turbo PAS¬ 
CAL udostępnia pewne operacje na liczbach całkowitych, 
charakterystyczne dla języków niskiego poziomu 
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PROGRAMOWAĆ MOŻE KAŻDY 


a shl b — Przesunięcie bitowej reprezentacj liczby a o 
b bitów w lewo, np. 

1 shl 7 = 128 

a shr b — To samo z przesunięciem w prawo 
a and b — iloczyn logiczny wszystkich bitów reprezen¬ 
tacji liczb a i b, np 

12 and 22 = 4 

a or b — Suma logiczna wszystkich bitów reprezentacji 
liczb a i b, np. 

12 or 22 = 30 

a xor b — Operacja alternatywy wykluczającej na bitach 
liczb a i b, np 

12 xor 22 = 26 

Operacji xor wolno również, obok innych operacji logicz¬ 
nych używać w odniesieniu do typu boolean 

true xor false = true 

not a — Negacja wszystkich bitów reprezentacji liczby 
a, np 

not $0001 - $FFFE 
not - 15 = 14 

ZBIORY 

Zbiory w Turbo mogą zawierać do 256 elementów Zbiór 

mogą tworzyć wyłącznie elementy tego samego typu pro¬ 
stego 

ŁAŃCUCHY ZNAKÓW — 
TYP STRING 

Typ standardowy string służy do reprezentacji tekstów 
Jego wprowadzenie stanowi duże udogodnienie dla pro 
gramisty, który w standardowym PASCAL-u musiał prze 
chowywac ciągi znaków w tablicach Deklarując użycie 
typu string należy podać maksymalną długość łańcucha 
znaków jaki ma być reprezentowany, np 

type BuforTekstowy = string [128]; 
var Linia: string [80]; 

Podana długość maksymalna musi należeć do zakresu 
1 .255 Zmienne typu string mogą przyjmować wartość do¬ 
wolnego łańcucha znaków o długości me większej mz za¬ 
deklarowane maksimum, W przypadku próby przypisania 
dłuższego łańcucha jego koniec jest pomijany. Oto przy¬ 
kłady 

Linia: = ”; 

Linia: = Telefon 110’; 
read (Linia); 

Dane typu string można porównywać przy pomocy ope¬ 
ratorów = , «, < = , >, >= Można też używać operacji + w celu 

łączenia łańcuchów ze sobą, np 

Lima: = ’rok 19’ + ’87:’ + Linia; 

Dozwolone jest podstawienie za wartość zmiennej typu 
string wyrażenia typu char lub array [..] ot char Wolno ró¬ 
wnież odwoływać się do poszczególnych znaków łańcu 
cha przy pomocy indeksów — jak w tablicy, np 

Znak: = Linia [10]; 

Pierwszy znak łańcucha nosi ndeks 1 Pod indeksem 0 
umieszczony jest znak odpowiadający bieżącej długości 
łańcucha 

Dalszych operacji na danych typu string można dokony¬ 
wać przy pomocy standardowych procedur i funkcji: 

Delete (Zmienna, OdMiejsca, (leZnakow) 

Usuwa z łańcucha będącego wartość ą podanej zmien¬ 
nej podaną liczbę znaków, począwszy od wskazanego 
miejsca 

Insert (Łańcuch, Zmienna, OdMiejsca) 

Wstawia podany łańcuch znaków do łańcucha będącego 
wartością podanej zmiennej w miejscu wskazanym przez 
liczbę OdMiejsca 

Str (Liczba, Zmienna) 

Konwersja wartości podanej liczby (typu real lub inte- 
ger) na łańcuch znaków oraz nadanie zmiennej typu 
String wartości tego łańcucha 

Val (Łańcuch, ZmiennaLiczbowa, Kod) 

Konwersja zapisu liczby w postaci łańcucha na postać 

typu integer lub real i przypisanie wyniku zmiennej 
ZmiennaLiczbowa (typu integer lub real). Zmiennej całko¬ 
witej Kod przypisywane jest 0, jeżeli w trakcie konwersj 
nie wystąpił błąd W przeciwnym przypadku zmienna ta 
otrzymuje wartość miejsca w łańcuchu, w którym błąd wy¬ 
stąpił 

Copy (Łańcuch, OdMiejsca, lleZnakow) 

Funkcja przyjmująca wartość fragmentu podanego łań¬ 
cucha o podanym początku i długości. 


Concat (Lancuchl, Lancuch2,...) 

Funkcja odpow adająca operacji 

Lancuchl + Lancuch2 + ... 

Ilosc argumentów jest dowolna. 

Lenght(Łańcuch) 

Długość podanego łańcucha 

Pos (Wzorzec, Łańcuch) 

Funkcja przyjmująca wartość miejsca w którym występuje 
podany wzorzec wewnątrz podanego łańcucha Jeżeli 
wzorzec me występuje, wartość funkcji wynosi 0 

PLIKI 

Pliki definiuje się podobnie jak w PASCAL-u standardo¬ 
wym Nse jest wymagane umieszczanie nazw używanych 
zmiennych plikowych w nagłówku programu. Dostępny 
jest typ standardowy text określony jako file of char 

W Turbo występują (oprocz Input i Output) następujące 
standardowe zmienne plikowe. 

Con — plik odpowiadający konsoli użytkownika 
Kbd — klaw atura tejże konsoli (wolno tylko czytać), 

Lst — drukarka 

W urbo PASCAL-u występuje tylko jeden rodzaj pli¬ 
ków mianowicie stałe pliki dyskowe Zrezygnowano wo¬ 
bec tego z operacji put i get, występujących w standardzie 
PASCAL-a i odnoszących się głownie do plików tymcza 
sowych Ich rolę pełnią procedury read i write 

W związku z tak określonymi założeniami wprowadzono 
szereg dodatkowych procedur umożliwiających efektywne 
posługiwanie się piskami. 

Assign (Zmienna, NazwaPliku) 

Przypisanie danej zmiennej plikowej do pliku dyskowe¬ 
go o nazwie NazwaPliku, będącej łańcuchem znaków, np 

Assign (Spis, ’ KARTOTEKA.TXT); 

Przypisanie takie powinno być dokonane w programie 
przed pierwszym użyciem zmiennej plikowej Spis (np re- 
set (Spis) lub rewrite (Spis)) 

Ciose (Zmienna) 

Zamknięcie pliku określonego przez zmienną Zmienna 
Zamknięcie mus być ostatnią operacją wykonywaną na 
każdym przetwarzanym w programie pliku. 

Seek (Zmienna, N) 

Ustawień e wskaźnika pliku Zmienna na N-ty element 

tego p iku Pierwszemu elementowi pliku odpowiada N = 
0 

Flush (Zmienna) 

Wypisanie sektora pliku (bufora) aktualnie przetwarza¬ 
nego w pamięci na dysk 

Erase (Zmienna) 

Usunięcie z dysku pliku odpowiadającego zmiennej 
Zmienna. 

Rename (Zmienna, NowaNazwa) 

Zm ana nazwy pliku odpowiadającego zmiennej Zmien¬ 
na na nową, określoną przez łańcuch NowaNazwa np. 

identyfikator: = ’NOWY.TXT’; 

Rename (Spis, Identyfikator); 

FiiePos (Zmienna) 

Funkcja przyjmująca wartość aktualnej pozycji wskaźni¬ 
ka pliku (patrz Seek). 

FileSize (Zmienna) 

Funkcja przyjmująca wartość liczby elementów danego 
pliku Plikowi pustemu odpowiada wartość 0. 

lOResult 

Funkcja przyjmująca wartość kodu błędu ostatnio wyko¬ 
nanej operacji na pliku dyskowym (np. brak pliku o wska¬ 
zanej nazwie przepełnienie dysku, błędne podanie nazwy 
pliku) Jeżeli operacja odbyła się bezbłędnie, lOResult 
przyjmuje wartość 0. Funkcja ta umożliwia obsługę błędów 
tego rodzaju przy wyłączonej obsłudze automatycznej (dy¬ 
rektywa {$1-}). 

ZMIENNE STANDARDOWE 

Oprócz wymienionych standardowych zmiennych pliko¬ 
wych Turbo zawiera tablicę standardową Mem Dla pewnej 
wartości indeksu N Mem [N] oznacza zawartość komórki 
pamięci o adresie N Umożliwia to użytkownikowi bezpoś¬ 
redni dostęp do pamięci np 

Mem [$FFFA] : = $01; 

Bajt: = Mem [32767]; 

PROCEDURY I FUNKCJE 

W porównaniu ze standardem deklaracje procedur i 
funkcji pozostają w zasadzie nie zmienione Nowością jest 
natomiast możliwość stosowania nakładek tzn generowa¬ 


nia kodu wynikowego wybranych procedur na osobne pliki 
dyskowe których zawartość w trakcie wykonywania pro¬ 
gramu byłaby w odpowiednim momencie ładowana i wy¬ 
konywana Rozwiązanie takie pozwala na oszczędną gos¬ 
podarkę pamięcią w trakcie wykonywania programu i wy¬ 
konywanie programów dłuższych niż mieści pamięć kom¬ 
putera 

Zamiar kompilowania procedury lub funkcji na osobny 

plik określamy poprzedzając nagłówek jej deklaracji sło¬ 
wem kluczowym over!ay np 
overlay procedurę Edytor (var F : text); 

Kompilator sam utworzy odpowiednią liczbę plików o 

unikalnych nazwach. Nakładki, w odróżnieniu od dyrekty 
wy {$1} kompilatora mogą byc Zagnieżdżane 

PROCEDURY I FUNKCJE STANDARDOWE 

Oprocz wymienionych standardowych procedur i funkcji 
obsługi piikow i zmiennych typu string Turbo PASCAL 
oferuje szereg procedur — w większości ułatwiających 
użycie ekranu monitora Są to. 

ClrEol 

Skasowanie znaków w linii na prawo od kursora. 

ClrScr 

Skasowanie całego ekranu i umieszczenie kursora w 

jego lewym górnym rogu 

DelLine 

Skasowanie linii w której stoi kursor i przesunięcie częs 
ci ekranu poniżej o jeden wiersz w gorę 

InsLine 

Wstawienie pustej linii w miejscu kursora. Linie poniżej 
są przesuwane o jeden wiersz w dół 

GotoXY (Wers, Kolumna) 

Przesunięcie kursora do wskazanego rzędu i kolumny 
ekranu Górnemu lewemu rogowi odpowiadają współrzęd¬ 
ne (1,1). 

Delay (N) 

Wstrzymanie wykonywania programu na ok N milise¬ 
kund 

Randomize 

Inicjacja generatora liczb losowych. 

InLine (Kod) 

Procedura umożl wiająca łączenie PASCAL-a z kodem 
maszynowym. Parametrem InLine jest ciąg wartości od¬ 
powiadających programów w kodzie maszynowym, prze¬ 
dzielanych znakiem / W kodzie maszynowym wolno 

umieszczać nazwy zmiennych używanych na poziomie 
PASCAL-a. Wolno tez wykorzystywać wszystkie rejestry 

procesora bez żadnych ujemnych skutków Oto trywialny 

przykład wykorzystania InLine 

procedurę Increment (var X : byte); 
begin 

inline ($04/X {INC X }); 

end; 

Zbiór funkcji standardowych rozszerzono o nowe funk¬ 
cje 

KeyPressed 

Funkcja określająca, czy w danym momencie wciśnięty 
jest jakiś klawisz Np 

repeat until KeyPressed; 
read (Kbd, Klawisz); 

Random 

Rzeczywista liczba losowa z przedziału 0 1 (typem wy¬ 
niku jest real). 

Random (N) 

Liczba naturalna wylosowana z przedziału 0..N-1. Ty¬ 
pem wyniku jest integer). 

Hf (Liczba) 

Starszy bajt reprezentacji danej liczby całkowitej. 

Lo (Liczba) 

Młodszy bajt reprezentacji danej liczby całkowitej 

Swap (Liczba) 

Liczba całkowita powstała przez zamianę starszego i 

młodszego bajtu argumentu. 

Podany tu opis me jest jeszcze kompletny Poszczegól¬ 
ne implementacje Turbo dają programiście możliwość np 
operowania grafiką złożonych operacji na pamięci prze¬ 
twarzania dowolnych plików dyskowych itp. Zainteresowa¬ 
nych odsyłam do podręcznika „Turbo Pascal Reference 
Manuał , Borland International, Scotts Valley, Caiiforma. 
Wszystkim natomiast zyczę wiele satysfakcji z posługiwa¬ 
nia się tym językiem — i wielu efektownych programów 

Marcin Waligórski 
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KLAN ATARI 


W dniach od czwarte¬ 
go do jedenastego mar¬ 
ca Hanower stał się po 
raz drugi miejscem 

spotkania międzynaro¬ 
dowych wystawców, 
którzy prezentowali no¬ 
winki z „komputerowe¬ 
go światka”. 

W porównaniu z rokiem 1986 liczba 
uczestników targów spoza RFN wzrosła 
z 375 do 760, powierzchnia wystawowa 
zajmowała 205000 metrów kwadra¬ 
towych, a zwiedzających było około 
400000 

W pokazie brała również udział jedna z 
największych firm komputerowych na 
swiecie na czele z Jackiem, Samem i Le¬ 
onardem Tramielem Mowa oczywiście o 
Atari. Firma ta zamknęła rok 1986 wzro¬ 
stem zysku o 81,8% Pomijając Europę, 
gdzie komputery ATARI są jednymi z 
najlepiej sprzedających się, także w USA 
dzięki konkurencyjnym cenom jest to co¬ 
raz bardziej popularny komputer W Ha¬ 
nowerze pokazano nowe produkty kor¬ 
poracji. klon IBM PC i nową generację 
serii ST czyli MEGA ST 

ATARI PC jest kompatybilny ze stan¬ 
dardem MS/DOS Zegar procesora 
8088-2 jest przełączalny między 8 0 a 
4 77 MHz Pozostawiono pustą podsta¬ 
wkę do dołączenia koprocesora 8087 
przeznaczonego do obliczeń matematy¬ 
cznych W podstawowej konfiguracji 
ATARI PC ma pamięć 512 KB RAM z 
możliwością rozszerzenia o 640 KB na 
płycie głównej. Komputer wyposażony 
jest seryjnie w sterownik graficzny, który 
emuluje standardy EGA, CGA i Hercules 
oraz umożliwia dostęp do dodatkowych 
256 KB VIDEO-RAM ATARI PC posiada 
wbudowaną stację dysków 5 1/4 cala o 
pojemności 360 KB oraz wejścia równo¬ 
ległe, szeregowe i zintegrowane (dla 
myszy) Rozdzielczość w trybie teksto¬ 
wym wynosi 85 znaków w 25 limach, a w 
trybie graficznym 

a) z monitorem monochromatycznym 
720x348 (HERCULES) 

b) monitor kolorowy umożliwia wypro¬ 
wadzenie 640x350 punktów w 16 kolo¬ 
rach z palety 64 

Istnieje możliwość podłączenia urządzeń 
peryferyjnych takich jak 3,5 calowa stac¬ 
ja dysków mysz i dysk twardy (Winche¬ 
ster). Ciekawostką może być fakt, ze 
mysz do ATARI PC jest zgodna ze stan¬ 
dardem ATARI. Komplet składa się z 
monochromatycznego monitora, oddzie¬ 
lnej klawiatury i komputera. Koszt w RFN 
około 1798 marek 

Drugą nowinką, zaprezentowaną 
przez firmę ATARI w Hanowerze było 
MEGA ST Komputer pokazany w trzech 
wersjach rozszerzenie pamięci do 1 MB, 

2 MB, 4 MB RAM. Ta nowa generacja 
seri ST posiada niezależną klawiaturę 
połączoną z systemem spiralnie skręcó- 
nvm kablem Nowa klawiatura jest bar¬ 
dzo funkcjonalna i wygodna w użytkowa- 
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mu Jednostka centralna oparta na pro¬ 
cesorze MOTOROLA 68000 ma wbudo¬ 
waną dwustronną stację dyskietek 3,5 
cala o pojemności 720 KB Pam ęc przy 
'MEGA ST 2 i 4 wyposażona w jeden 
Mega Bit-Chip Płyta podstawowa tak 
skonstruowana, ze bez problemu daje 
się zwiększyć możliwości komputera np 
przez dołączenie dodatkowego układu 
Floatmg-Pomt-Coprocesor 68881 do 
niestandardowych operacji matematycz- 
nychrSą możliwe również inne rozsze¬ 
rzenia Seryjnie system będzie wyposa¬ 
żony w szybki Błock Transfer-Chip 
(BLT) nazwany blitterem, ktorego zada¬ 
niem jest wspieranie TOS-u MEGA ST 
jest w pełni kompatybilny z dotychczaso¬ 
wymi komputerami serii ST. Z tyłu posia¬ 
da wejścia równoległe do drukarki, sze¬ 
regowe RS232, do klawiatury, do dodat¬ 
kowej stacji dysków DMA do dysku 
twardego i drukarki laserowej, MIDI, VI- 
DEO dla monitora kolorowego (mała i 
średnia rozdzielczość) i monochromaty¬ 
cznego (wysoka rozdzielczość) Także 
port ROM-u jest tak pomyślany, aby ła¬ 
two można było w przyszłości dołączyć 
do niego nowe rozszerzenia Częsćią 
systemu może byc także dysk twardy 
20 MB SH205 Zasiian e ; kontroler i po¬ 
łączenie z komputerem są ukryte w obu¬ 
dowie Przekazywanie danych odbywa 
się przez szybki DMA-Port (Direct Me¬ 
mory Acces). Przewidywane ceny w 
markach RFN 



ATARI MEGA ST 1 2498 DM 
ATARI MEGA ST 2 2998 DM 
ATARI MEGA ST 4 3998 DM 

System wyposażony w monochromaty¬ 
czny monitor i mysz 

Prawdopodobnie nie będzie juz pro¬ 
dukcji 260 ST, zamiast tego będzie w tej 
klasie 520ST/M z pojedynczą stacją dys 
kow 3,5 cala i TOS em w ROM- e za 998 
DM 

Ostatnią nowością pokazaną na CeBst 
87 w Hanowerze przez firmę ATARI była 

drukarka laserowa SLM Osiąga ona szyb¬ 
kość druku osiem stron na minutę i roz¬ 
dzielczość 300 punktów na cal. Rozkazy 

przyjmuje bezpośrednio z komputera. 

Współpracuje tylko z komputerami serii 
MEGA ST od ST 2 w górę Wyposażona 
jest w port DMA. Jest możliwość podłą¬ 
czenia do niej dodatkowych urządzeń. W 
sprzedaży razem z ATARI MEGA ST 2 
za około 6000 DM 

W materiale wykorzystano informacje 
zawarte w miesięczniku ST COMPUTER 


Sergiusz Piotrowski 
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NIE BÓJ SIĘ PRZERWAŃ CO JEST W ŚRODKU (3) 


KLAN ATARI 


Układ GTIA (Graphics Television In- 
terface Adaptor) jest także układem 
specjalnie zaprojektowanym dla kom¬ 
puterów Atari. Otrzymuje on dane 
obrazu od ANTIC-a, dodaje do nich in¬ 
formacje o kolorze i przesyła je następ¬ 
nie do monitora. Oprócz tego GTIA 
tworzy na ekranie ruchome obiekty 
czyli tzw. grafikę graczy i. pocisków 
(Player/Missile Graphics — P/MG). 

Podstawowym zadaniem GTIA jest uzupełnianie 
obrazu kolorem Dla wypełnienia tej funkcji posiada 
on 9 rejestrów koloru Są one jednakowo zbudowa¬ 
ne bity 1 -3 określają jasnosc, a bity 4 7 barwę (bit 
0 jest me wykorzystany) Aby uzyskać odpowiedni 
kolor należy więc do takiego rejestru wpisać sumę 
wartości barwy pomnożonej przez 16 i jasności 
Cztery rejestry przeznaczone są dla kolorow „pola 
gry " (COLor of Play Field), a cztery dla graczy i po¬ 
cisków (COLor of Player/Missile) Oprócz tego ist¬ 
nieje jeszcze rejestr koloru tła (COLor of BAcKgro- 
und) Kolor z tego rejestru jest wyświetlany zawsze 
tam, gdzie me występują żadne dane obrazu, a 
więc w zasadzie na krawędziach obrazu W niektó¬ 
rych trybach graficznych określa on także kolor 
ekranu (np ANTIC 6 8 s m ) 

GTIA umożliwia także uzyskanie trzech dodatko¬ 
wych trybów graficznych Są one sterowane bitami 
6 i 7 rejestru GTIACNTL (zob niżej) ANTIC pracu¬ 
je wtedy w trybie 15, lecz dane obrazu przesłane 
do GTIA są przez mego inaczej interpretowane. 
Dane te są dzielone na czterobitowe kawałki, które 
służą do wyboru koloru w zależności od wartości 
pary bitów 7 i 6 w GTIACNTL Gdy jest ona równa 
01 (GRAPHICS 9), to kolor całego ekranu jest po¬ 
bierany z rejestru COLBAK, a czterobitowe kawałki 
danych określają jasnosc punktów wyświetlanych 
na ekranie Przy wartości 10 (GRAPHICS 10) ka¬ 
wałki te określają kolejne rejestry, z których pobie¬ 
rane są kolory punktów Ponieważ rejestrów tych 
jest 9, to można uzyskać jednocześnie 9 kolorow 
Para bitów 11 (GRAPHICS 11) działa podobnie jak 
01, lecz z rejestru COLBAK pobierana jest jasnosc 
punktów, a wartość czterobitowego kawałka da¬ 



nych określa kolor Umożliwia to uzyskanie 16 ko¬ 
lorow o jednakowej jasności (a więc me można ich 
odrozmc w czarno-białym telewizorze) 

Drugim bardzo ważnym zadaniem GTIA jest two¬ 
rzenie grafiki graczy i pocisków Ponieważ było to 
obszernie opisane w artykule „Duszki” w „Bajtku ” 
nr 3/87, to ograniczę się tylko do kilku zagadnień, 
które zostały tam pominięte. GTIA tworzy jednora¬ 
zowo jedną limę ekranu W związku z tym część 
kształtu duszka, która ma się znalezc w aktualnie 
wyświetlanej linii, jest chwilowo przechowywana w 
rejestrze grafiki (GRAFP, GRAFM) Zawartość tych 
rejestrów jest zmieniana co jedną limę ekranu przy 
rozdzielczości jednowierszowej i co dwie linie przy 
dwuwierszowej. Wyglądem „duszków" sterują ró¬ 
wnież rejestry szerokości (SIZEP, SIZEM) W reje¬ 
strach SIZEP znaczenie mają tylko bity 0 i 1, a po¬ 
zostałe są me wykorzystane W rejestrach GRAFM i 
SIZEM kolejne pary bitów odpowiadają kolejnym 
pociskom W wielu programach istotne jest ustale¬ 
nie, czy nastąpiła kolizja pomiędzy duszkami lub 
msędzy duszkiem a polem gry Do tego celu GTIA 
posiada rejestry kolizji, w których ustawienie jedne¬ 
go z bitów 0-3, oznacza, ze nastąpiła kolizja z po¬ 
lem gry lub graczem (bty 4-7 są me wykorzystane) 
Rejestry kolizji są rejestrami tylko do zapisu, a ska¬ 
sowanie ich zawartości następuje po wpisaniu do¬ 
wolnej wartości do rejestru HITCLR 

Dodatkowym zadaniem GTIA jest kontrola przycis¬ 
ków joysticków i tzw. klawiszy kontroli czyli klawiszy 


S ART, SELEC i OPTION. Stan przycisków joysti¬ 
cków można sprawdzić w rejestrach TRIG0 i TRSG1 
Wartość 1 oznacza przycisk zwolniony, a wartość 0 
— naciśnięty. Klawisze konsoli obsługuje rejestr 
CONSOL, w którym bity są przyporządkowane kla¬ 
wiszom jiastępująco bit 0 — START, bit 1 — SE- 
LECT i bit 2 — OPTION Bit skasowśny oznacza, 
ze odpowiedni klawisz jest wciśnięty B ty 4-7 w 
jym rejestrze są nie wykorzystane a bit 3 po skaso¬ 
waniu wywołuje dźwięk (, khck ) klawiatury. 

Teraz kolej na trochę adresów (O oznacza rejestr 
tylko do odczytu, a Z — tylko do zapisu) 

53248 53251 HPOSPO 3 Poziome położenie graczy (Z) 
53252-53255 HPOSMO 3 Poziome położenie pocisków (Z) 
53256-53259 SIZEPO 3 W elkosc pozioma graczy (Z) 

53260 SIZEM Wielkość pozioma pocisków (Z) 

Wartości par bitów oznaczają odpowiednio 
00 — normalna wielkość (8 cykli koloru) 

01 — podwójna wielkość (16 cykli) 

10 —normalna wielkość 


11 — poczwórna wielkość (32 cykle) 

Rejestry grafiki graczy (Z) 
Rejestry grafiki poctskow (Z) 
Kolizje pocisków z polem gry (0) 
Kolizje graczy z polem gry (O) 
Kolizje pocisków z graczami (0) 
Kolizje graczy z graczami (O) 
Kasowanie rejestrów kolizji (Z) 
Stan przycisków joyst cków (O) 
Rejestry — cienie TRIG0-1 
Kolory graczy i pocisków (Z) 
Rejestry — cienie COLPMO-3 
Kolory pola gry (Z) 

Rejestry — cienie COLPFO 3 
Kolor tła (Z) 

Rejestr —cień COLBAK 
Stan klawiszy konsoli 
Rejestr kontroli GTIA Bity 0 5 
sterują P/MG a bity 6 7 umoż¬ 
liwiają uzyskanie dodatkowych 
trybów graficznych 
Rejestr kontroli . duszków” 
Oprócz ANTIC-a i GTIA także system operacyjny 
ma swój udział w tworzeniu obrazu, ale o tym za 
miesiąc 


53261-53264 GRAFPO-3 

53265 

GRAFM 

53248 53251 KOLM0-3PF 
53252-53255 KOLPO-3PF 
53256-53259 KOLMO 3PL 
53260-53263 KOLPO-3PL 

53278 

HITCLR 

53264-53265 TRIG0-1 

644-645 

TRIG0-1 § 

53266-53269 COLPMO-3 

704-707 

COLPMO-3§ 

53270-53273 COLPFO 3 

708 711 

COLPFO 3§ 

53274 

COLBAK 

712 

COLBAK§ 

53279 

CONSOL 

53275 

GTIACNTL 

623 

GTIACNTL§ 

53277 

PMCNTL 


Wojciech Zientara 


PŁYNĄCY NAPIS 


Czytelnicy „IKS-a”, będący posia¬ 
daczami mikrokomputera Atari, zau¬ 
ważyli zapewne w numerze 2/87 tego 
czasopisma program „Komputerowy 
teleexpress”. 

Realizuje on uatrakcyjnienie posiadanych wcześniej 
programów przez dołączenie do nich strony tytuło¬ 
wej, czy też winiety. Ci Czytelnicy, którzy „wpakowa¬ 
li” go na swoje Atari, stwierdzili z pewnością ograni¬ 
czenia w wykorzystaniu tego programu, wynikające 
stąd, że został on napisany całkowicie w RASIC-u. 
Wyświetlany na ekranie tekst przeskakuje po literze, a 
nie jest płynnie przewijany. Ponadto w czasie, gdy 
program jest wykonywany, komputer nie może reali¬ 
zować innych działań, co jest istotnym mankamen¬ 
tem. 

Program, ktorego wydruk znajduje się obok, jest 
pozbawiony tych dwóch niedoskonałości. Pracuje on 
w kodzie maszynowym 6502 wykorzystując dostępne 
na Atari przerwania. Prawdziwie płynny przesuw tek¬ 
stu jest możliwy do osiągnięcia dzięki sprzętowemu 
wspomaganiu przewijania obrazu. 

Ci Czytelnicy, którym zależy jedynie na posiadaniu 
programu, mogą w tym miejscu przerwać lekturę. Dla 
dociekliwych jeszcze kilka słów tytułem wyjaśnienia. 

System operacyjny Atari wytwarza cały szereg róż¬ 
norodnych przerwań. Najważniejszym z nich jest 
przerwanie synchronizacji pionowej (Vertical Blank 
Interrupt — w skrócie VBLK). Jest ono generowane 
po wykonaniu każdego obrazu (co 1/50 sekundy) i ob¬ 
sługuje m.in. procedury, które same nie mogą byc 
źródłami przerwań, w tej liczbie również procedury 
obsługi zegarów ustawiane przez użytkownika. Były 
one opisane w „Bajtku” 4/87. 


Licznikiem zegara TIMER2 są komorki pamięci o ad¬ 
resach 538 i 539 Gdy obie komorki zostaną wyzero¬ 
wane, wykonywana jest procedura, której adres usta¬ 
wia się w komórkach 552 oraz 553 (TIMER2VKT). Pro¬ 
cedura ta musi się oczywiście konczyc rozkazem 
RTS, aby system nie ugrzązł w niej bezpowrotnie. 
W naszym programie TIMER2 wykonuje „czarną” ro¬ 
botę związaną z przesuwaniem pojawiającej się nad 
ekranem linii tekstu. 

Możliwość płynnego przewijania linii obrazu o odci¬ 
nki mniejsze mz wynikałoby to z mapy pamięci ekranu 
(w trybie graficznym 0 jeden bajt pamięci obsługuje 
obszar odpowiadający jednemu znakowi) jest również 
specyficzną cechą komputerów Atari. Linie obrazu, 
których rozkazy w programie ANTIC-a mają ustawio¬ 
ny 4 bit, są przesuwane w prawo o ilosc punktów od¬ 
powiadającą zawartości rejestru HSCROLL — 54276. 
Nasz program zmieniając po każdym przerwaniu 
VBLK zawartość HSCROLL pozwala na uzyskanie 
opisanych efektów. Jednak sama modyfikacja zawar¬ 
tości tego rejestru pozwala na przesunięcie obrazu w 
zakresie kilku znaków. Aby uzyskać przesuwanie się* 
większych partii tekstu trzeba połączyć płynny i zgru¬ 
bny przesuw. Ten drugi realizowany jest przez mody¬ 
fikację licznika pamięci obrazu ruchomej linii. Tekst 
wyświetlany w tej linii znajduje się, podobnie jak sam 
program, na szóstej stronie pamięci. Należy o tym pa¬ 
miętać przy ewentualnych zmianach w programie. 

Linia z przesuwającym się tekstem pojawia się po 
każdej instrukcji GRAPHICS. Również wciskanie kla¬ 
wisza RESET me może usunąć jej z ekranu. Polecenie 
POKE 1560,96 zatrzymuje przesuw i dopiero wtedy 
GRAPHICS usuwa Imię z ekranu. Pojawia się ona po¬ 
nownie po wykonaniu POKE 1560,173. 

Andrzej Biazik 


0 REN ** 'Płynący napis' ** 

1 REM ** (c) 198? A. Biazik *« 

2 REM zatrzymanie - POKE 1560,98 

3 REM restart - POKE 1560,173 

10 S=0iFQR 1-1536 TO 1643iREAD A:POKE I 
,A:S=S+AiNEXT I:IF 8011583 THEN ? ■ Bt 
AD DANYCH":END 

20 CLR iDIM AI(40)iINPUT Ali? CHRK125) 
i Al 

30 FOR 1=1 TO 40:P=PEEK(39999+1)iPOKE 1 
644+1,PiPOKE 1684+1,PiNEXT Ii? CHRK125 
) 

40 POKE 12,lsPOKE 13,6iP0KE 9,lsX=USR(l 
536)>NEH 

100 DATA 104,169,19,141,40,2,169,6,141, 

41.2.169.4.133.208.169.40.133.207.169.1 
,141,26,2^ ' 

110 DATA 173,48,2,133,203,173,49,2,133, 
204,160,2,177,203,201,112,208,25,56,165 
,203,105 

120 DATA 2,141,106,6,165,204,105,0,141, 

107.6. 169. 100.141.48.2.169.6.141.49.2.1 
98,208 

130 DATA 165,208,141,4,212,208,23,169,4 
,133,208,141,4,212,238,103,6,198,207,20 
8,9,169 b 

140 DATA 40,133,207,169,108,141,103,6,9 
6,112,112,82,108,6,1,0,0 
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Komputery Atari znane są ze 
swoich możliwości graficznych. 
Programy graficzne są najliczniej 
reprezentowane w grupie progra¬ 
mów użytkowych na Atari. Dla 
tych, którzy lubią „grzebać w bi¬ 
tach” bardzo pomocna jest znajo¬ 
mość formatu, w jakim zapisywa¬ 
ny jest obraz. 


Najpopularniejszymi programami graficznymi na Ata¬ 
ri XL/XE są M cropainter, Fun with Art i Koala Microillu- 
strator W tym artykule zostaną przedstawione formaty 
zapisu obrazu stosowane przez te programy 


MICROPAINTER 


Jest to jeden z najstarszych i najprostszych progra¬ 
mów Używa trybu GRAPHICS 15. W trybie tym obraz 
złozony jest ze 192 linii po 40 bajtów, więc pamięć 
obrazu zajmuje 7680 bajtów Wykonany rysunek jest 
zapisywany kolejno bajt po bajcie. Aby umożliwić od¬ 
tworzenie kolorów, na końcu pliku zapisywane są za¬ 
wartości rejestrów koloru w kole nosci 712 (tło), 708, 
709 i 710. Cały plik zawiera więc 7684 bajty 


FUN WITH ART 


Program ten używający także trybu GRAPHICS 15 
umożliwia zmianę kolorow na rysunku poprzez zasto¬ 
sowanie przerwań programu ANTIC-a (DLI) Odtwo¬ 
rzenie wykonanego rysunku wymaga więc zapisania w 
pliku linii, w których nastąpiły zmiany kolorow oraz tych 
kolorow. Format plików zapisywanych przez ten pro¬ 
gram jest następujący 

2 bajty — Nagłówek wskazujący, ze jest to plik rysu 

nku Fun with Art. Oba bajty są równe 254 ($FE) 

4 bajty — Dane kolorow w takiej samej kolejności jak 
w MicroPainter (712, 708, 709, 710) 

256 bajtów — Program ANTIC-a i tablica przerwań. 
Ten blok jest wczytywany na szóstą stronę pamięci 
(adresy 1536 1791). 

4080 bajtów — Dane pamięci obrazu Przy przekra¬ 
czaniu granicy 4 KB musi nastąpić ponowne załadowa¬ 
nie hęznika pamięci obrazu w układzie ANTIC Funt 
with Art wpisuje w ęc dane w blokach 

16 bajtów — Zera wypełń a ące obszar pierwszego 
bloku pamięci obrazu do pełnych 4 KB (4096 B) 

3600 bajtów — Drugi blok danych obrazu — uzupeł¬ 
niający obraz do 7680 bajtów 
2 lub więcej bajtów — Tu zapisane są dane dla 
przerwań programu ANTIC-a Długość tego bloku za¬ 
leży od ilości użytych p-ze wan i może wynosić maksy¬ 
malnie 2304 bajty. Jezel; nie zostało użyte żadne 
przerwanie, to oba bajty są równe zero 


KOALA MICROILLUSTRATOR 


Najbardziej znany program graficzny, posiadający 
także wersję na cartridge’u Korzysta również z trybu 
15. W celu zaoszczędzenia nośnika program ten sto¬ 
suje specjalny, skondensowany format zapisu plików. 
Oprócz tego została w mm uwzględniona możliwość 
przyszłej modyfikacji i rozbudowy programu W związ¬ 
ku z tym plik zapisywany przez mego posiada duży na¬ 
główek precyzujący parametry obrazu Format tego na¬ 
główka jest następujący. 


4 bajty — Identyfikator wskazujący że jest to plik 
Koala. Bajty te są równe 255, 128, 201 i 199. 

2 bajty— Długość nagłówka liczba bajtów nagłówka 
minus jeden zapisana jako młodszy i starszy bajt Zwy¬ 
kle bajty te są równe 26 i 0 

1 bajt — Numer wersji programu, teraz równy 1 . 

1 bajt — Rodzaj zastosowanej kompresji rysunku: 0 
— nieskondensowany, 1 - kompresja pionowa, 2 — 
kompresja pozioma 

1 bajt — Numer trybu graficznego ANTIC-a (UWA¬ 
GA! rożny, od numeru trybu GRAPHICS). Normalnie 
równy 14 Zapisywanie tej wartości świadczy o tym że 
przewidywane były wersje programu używające innych 
trybów. 

4 bajty Aktualna konfiguracja pamięci obrazu — 
ilosc bajtów w lim (0 i 40) oraz ilosc linii (0 i 192). Pra¬ 
wdopodobnie przewidywane do zastosowania w dal¬ 
szych wersjach 

5 bajtów — Dane kolorow w kolejności rejestrów od 
708 do 712 

2 bajty — Całkowita długość pliku obrazu 

2 bajty — Oba równe zero Przewidziane do wyko¬ 
rzystania w przyszłości. 

1 bajt — Obecnie zawiera wartość 155 (RETURN) 
Jest to miejsce przewidziane do zapisania tytułu rysun¬ 
ku (do 14 znaków); aktualnie me używane, 

1 bajt -155 (RETURN) Miejsce na nazwisko autora 
(14 znaków); aktualnie me używane. 

2 bajty — Oba równe 155. Przewidziane na dwie Ii- 
me tekstu, obecnie me używane. 

1 bajt — Bajt odstępu oznaczający koniec nagłówka 
Równy 162 

Po nagłówku następują dane obrazu zapisane w po¬ 
staci skondensowanej. Długość pliku zależy od szcze¬ 
gółowości rysunku, a dokładniej od liczby powtarzają¬ 
cych się danych. Przed zapisaniem pliku program 
przeszukuje pamięć obrazu i zapisuje dane w blokach 
Pierwszy bajt każdego bloku określa jego rodzaj. Sto¬ 
sowane są cztery rodzaje blokow o następujących for¬ 
matach- 

1 Pierwszy bajt Onnnnnnn, gdzie nnnnnnn jest roż¬ 
ne od zera i oznacza ilość powtórzeń danej. Drugi bajt 
zawiera daną, która ma byc powtarzana Umożliwia za¬ 
pisanie w dwóch bajtach danej powtarzającej się do 
127 razy. 

2 Pierwszy bajt 00000000. Dwa następne bajty za¬ 
wierają liczbę powtórzeń danej (od 0 do 65535). 
Czwarty bajt jest daną, która ma byc powtarzana. 

3 Pierwszy bajt 1 nnnnnnn gdzie nnnnnnn jest roż¬ 
ne od zera i oznacza ilosc bajtów danych w bloku (0- 
-127). Drugi i następne bajty zawierają niepowtarzalne 
dane obrazu 

4 Pierwszy bajt 10000000 Drugi i trzeci bajt okre¬ 
ślają ilość bajtów danych (0 65535) Dalsze bajty za¬ 
wierają niepowtarzalne dane obrazu 


ZASTOSOWANIE 


Dobrze, tylko po co to wszystko 7 Programów zamie¬ 
niających rysunki z jednego formatu na inny jest kilka 
(sam znam cztery), więc nikt me będzie się w to bawił 
To prawda, lecz zastosowań dla podanych tu informacji 
można znalezc wiele. Oto najprostsze napisałeś grę i 
chciałbyś ozdobie ją ładnym obrazkiem tytułowym Na¬ 
rysować nie problem, ale jak potem wczytac skoro plik 
MicroPaintera ma prawie 8 KB (ile to będzie trwało z 
magnetofonu!). Rozwiązanie samo się narzuca plik 
Koali jest 4-5 razy krótszy, trzeba tylko napisać proce¬ 
durę która go odczyta. Oszczędność czasu będzie 
mniej w ęcej trzykrotna A ile satysfakcj ! 

Wojciech Zientara 


KLAN ATARI 

ZAMIANA NAPISÓW 
W PROGRAMACH 

Prawie wszystkie programy dostęp¬ 
ne dla mikrokomputerów pochodzą z 
zagranicy. Z tego powodu wszystkie 
napisy w takich programach są obco¬ 
języczne. Oczywiście każdy, kto choć 
raz miał do czynienia z komputerem, 
wie co znaczy SCORE. Ale dlaczego 
nie miałoby być napisane WYNIK. 

Poniższy program umożliwia skopiowanie programu z 
kasety lub dyskietki, wymianę napisów i ponowne zapisa¬ 
nie na kasecie lub dyskietce 
Działanie programu jest bardzo proste. Na początku na¬ 
leży podać nazwę zbioru źródłowego i docelowego (dla 
magnetofonu C, dla stacji dysków D NAZWA). Program 
nasz najpierw odczytuje kopiowany program traktując go 
jako ciąg znaków Następnie żąda podania tekstu który ma 
byc usunięty, i tekstu, który ma byc wstawiony na jego 
miejsce Muszą one byc tej samej długości — gdy nowy 
tekst jest dłuzszy, trzeba uzyc skrótów; gdy krótszy nale¬ 
ży uzupełnić go spacjami (na początku). Teraz komputer 
wyszukuje we wczytanym programie stary tekst i zamienia 
go na nowy. Dokonana zamiana jest sygnalizowana dźwię¬ 
kiem, równocześnie wyświetlany jest numer kolejny bajtu, 
od którego zaczyna się wymieniany tekst. Po przejrzeniu 
całego programu ponownie następuje żądanie podania 
tekstu do wymiany i procedura jest powtarzana Aby za¬ 
kończyć program należy w odpowiedzi na żądanie tekstu 
do wymiany nacisnąć klawisz RETURN Jeszcze tylko za¬ 
pisanie poprawionego programu i możemy korzystać z 
polskiej wersji. 

Na zakończenie trzy praktyczne uwagi: 

1. Teksty trzeba podawać dokładnie. Jeżeli w programie 
jest HI-SCORE, a podamy HISCORE to napis me zostanie 
zmieniony. 

2 Przed wymianą napisów trzeba zastanowić się nad ko¬ 
lejnością Np podajemy stary tekst SCORE i nowy WY¬ 
NIK. Gdy teraz podamy Tekst HI-SCORE, to me będzie on 
zmieniony, bo w tym miejscu jest juz HI-WYNIK 

3 Należy unikać krótkich napisów, gdyż można spowodo¬ 
wać zmiany programu. Np. tekst HI odpowiada sekwencji 
rozkazów PHA, EOR n, a tekst LV — sekwencji JMP 
86 + 256 * n. 

Wojciech Zientara 


10 DIN FU • 20 >, F2$ (. 20 ) , ML#<28> , S U < 30> , 
S2$<30> POKE 710,0 TPHF 120 OPEN #5,4,0 

li 1/ . U 
; f\ * 

20 FHM-FFE f ' 0 > -4000 Din P4+.RHM+1 > 

30 ? “CCLEARJ COOLJ% CYJBFCH 2■6 TYJ t Boo 
t-F ile -Uh a fis er 2.0" ■ ? " CDOL J Co pyriaht 
(c> 1 j 86 by W. ZientaraC2 DOŁU" 

40 ? M INPUT-FILE ", INPUT FU IF FU 
a,l> = H C" THEN H1 -= 12B 

50 ? "CDuL J UUTPUT-FILE "j INPUT F2T I 
F F2$a,l> = "C“ THEN A2=128 
60 CLOSE #1 OPEN #1,4,01,FU ? "Czytań. 
".FU 

70 ML $=‘hhhthhCIHSJB CCIh CINSJE CC3h CINSJ 
DCCJhCINSJ ICC J KEIt Jo J H CC J L V£i " 

80 X=USR C ADR C ML $)# 16,7, ODR < D$ j, PHN ,• L=P 
EEK < 856>+256 *PEEK < 857 > 

90 ST=PEEK<851> IF ST=1 UP ST=136 THEN 
130 

100 ? "C2J DLAD ",ST 

110 FOR 1=1 TU 1000 NEKT I RUN 

120 ST=PEEK<195) ? "CDULJW LINII ",PEEK 

<186 > +256TPEEK<187>," ", GOTO 100 

130 D$*;L+1) = "" 

140 ? "Zbiór załadowany w całości." CLU 
SE #1 

150 ? "Blok danych ma dlu.sosc ";L, " ba j 
tow" FOR 1=1 TU 1000 NEKT I 
160 POSITION 2,5 ? "02 DELJCDOL J" POKE 
752,0 

17u 7 "PODAJ STARY TEKST (wax.30 znaków 

>" INPUT SU IF SU="" THEN 230 

180 ? "PODAJ NOWY TEKST <tei same j dłu.a 

osci>" INPUT S2S IF LEN ■: S2$ ) O LEN (Sił) 

THEN ? "C2JC2 GORAJ C3 DELJ" GOTO 180 

190 K=LEN<SU>-1 POKE 752,1 FOR 1 = 1 Tu 

L-K 

200 IF D$<I,I+K)=SU THEN Dt<I, I+K)=S2* 
? "C2J "iii I=I+K 
210 NEKT I GOTO 160 

230 ML$= " hhhfhh C INSJ B CCJh CINSJE CCJhCI NS 
JDCCJhCINSJICCJhCINSJHCCJLYd" ? "C2 GOR 
AJ C3 DELJ", 

258 CLOSE #1 OPEN #1,8,A2,F2$ ? "Zapisu 
Je ",F 2$ 

260 X=USR<ADRCMLf),16,11,HDRCDU),L) IF 
PEEK<851K>1 I HEN 100 
270 CLOSE #1 END 
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Kanały i strumienie mogą być wy¬ 
korzystywane zarówno przez tych, 
którzy swe programy piszą tylko w 
BASIC-u, jak i tych, którym nieob¬ 
cy jest asembler. Pisząc programy 
całkowicie w BASIC-u nie można 
wprawdzie wykorzystać wszyst¬ 
kich możliwości, które kanały ofe¬ 
rują użytkownikowi, lecz w niektó¬ 
rych przypadkach można uzyskać 
bardzo ciekawe efekty. 


Idea w wyniku której powstały kanały jest bardzo prosta 
maksymalnie ujednolicić sposob wysyłania mformac i do 
urządzeń peryferyjnych takich jak drukarka ekran, mi- 
crodrive itp — wszystkie te informacje wysyłać za pomocą 
jednej instrukcji. W BASIC-u jest nią właśnie PR1NT. 

Kanał jest symulacją linii przesyłowej łączącej komputer 
z którymś z tych urządzeń Chcąc przykładowo przekazać 
informacje drukarce, należy przesyłać je używając PRINT- 
-a, lecz za pomocą odpowiedniej „linii” — kanałem służą¬ 
cym do porozumiewania się z drukarką. 

Normalnie w SPECTRUM istnieją 4 kanały 
Kanał P PRINTER — służący do wysyłania informacji na 
drukarkę 

Kanał „S SCREEN — wykorzystywany do druku w gór¬ 
nej części ekranu 

Kanał „K KEYBOARD — służący do wysyłania oraz 
przyjmowania (np. w instrukcji INPUT, podczas 
wprowadzania komend z klawiatury itp.) informacji, 
przy wykorzystaniu dolnej części ekranu 
Kanał „R WORKSPACE — zupełnie nieprzydatny dla 
BASiC-a, a służący do magazynowania napływają¬ 
cych informacji, które potem mogą być odczytane 
wszystkie razem. 

Z poziomu BASIC-a można korzystać tylko z trzech pierw¬ 
szych kanałów czyli K S i P 

Aby wyprowadzić z komputera informacje w którymś z 
tych kanałów, należy posłużyć są me jego nazwą lecz nu¬ 
merem Numer ten, to tzw strumień Przyporządkowanie 
kanałów strumieniem jest następujące: 

Strumienie -3,0.1 — kanał K 

-2.2 — S 

3 — P 

-1 — R 

Strumienie 4 -e 15 są początkowo zamknięte, tzn. me jest 
im przypisany żaden kanał. 

Wszystkie strumienie ujemne są dla BASIC-a niedostęp¬ 
ne, lecz aby skorzystać z kanałów K S i P wystarczą stru¬ 
mienie 0 1,2 i 3. 

Instrukcja PRINT drukuje w kanale S (strumień 2). 
LPRINT, które daje wydruk na drukarce, różni się od 
PRINT tylko tym że korzysta z kanału P (poprzez strumień 
3) Jeżeli chcemy wewnątrz instrukcji PRINT lub LPRINT 
zmienić kanał wydruku, to musimy użyć znaku # (hash), 
po którym występuje numer wybranego przez nas stru¬ 
mienia. Jeśli napiszemy: 

PRINT # 3; „tekst” 

to będzie to równoznaczne z LPRINT „tekst". Napis poja¬ 
wi się na drukarce. Kanał wydruku można także zmieniać 
kilkakrotnie w jednej mstrukcj: 

LPRINT „to jest na drukarce” # 2;„to na górze ekra¬ 
nu”; # O „a to na dole ekranu" PAUSE 0 
Instrukcja PAUSE jest tu po to, by napis, który się pojawi w 
dolnej części ekranu nie został od razu skasowany przez 
komunikat „0 OK" 

Teoretycznie istnieje także możliwość wyboru kanału w 
instrukcji INPUT, lecz wybór ten ogranicza się tylko do 
dwóch strumieni; 0 i 1, czyli tylko do kanału K. Działanie 
INPUT-a w innych kanałach nie jest możliwe, ponieważ tyl¬ 
ko kanał K może służyć jako kanał wejściowy. W tym przy¬ 
padku są one odbierane z klawiatury oraz wysyłane na 
ekran, do dolnej części ekranu. 

Oprócz PRINT #, INPUT # i LIST #, istnieją jeszcze 
dwie instrukcje, pozwalające otwierać lub zamykać stru¬ 
mienie przeznaczone dla użytkownika (strumienie 4 h- 
15). Są to OPEN # które strumień otwiera, oraz CLOSE # 

, które go zamyka. 

OPEN # nr, nazwa kanału — otwiera strumień o poda¬ 
nym numerze przyporządkowując mu kanał o podanej na¬ 
zwie. Nazwa ta jest jednoznakowym łańcuchem , K , S' 
lub „P" (albo „k", „s”, „p"). Mozę to być oczywiście 
zmienna łańcuchowa, lecz gdy nie jest ona żadnym z tych 
łańcuchów lub jej długość jest większa niż jeden znak, to 
jest generowany komunikat „lnvalid file name” 

Jeśli więc np. chcemy otworzyć strumień 4 dla kanału K, 
to piszemy: OPEN # 4, „K” lub OPEN # 4 ,k i od tej 
pory PRINT # 4;... drukuje w dolnej części ekranu. Dzieje 
się tak do momentu w którym zamkniemy strumień 4 
przez CLOSE # 4 Teraz próba użycia tego strumienia wy¬ 
woła jedynie protest naszego komputera w postaci komu¬ 
nikatu „lnvalid stream’ Przy zamykaniu kanałów należy 


bardzo uważać, ponieważ na skutek błędu w ROM le pró¬ 
ba zamknięcia kanału, który został juz zamknięty wcześ 
mej lub w ogolę me był otwierany, kończy się zazwyczaj 
zawieszeniem się komputera 
W programach nie wykorzystujących w ogolę procedur 
w języku maszynowym, kanały mogą byc użyte w progra¬ 
mach drukujących jakieś dane (np w przedstawionym m 
żej przykładzie, tablice a i b$) w zależności od potrzeb, na 
ekranie lub drukarce: 


lO DIM a(20)s DIM b«(20,16) 

lOO OPEN #4, *' s" r GO SUB lOOO 
HO OPEN #4,"p H s GO SUB lOOO 

lOOO REM podprogram drukujący tabl 
ice a O i b$() 

lOlO PRINT #4; M Tablica a","Tabl 
lca b*'* 

1020 FOR n=l TO 20 

1030 PRINT #4;n;TAB 3;a(n),b*(n) 

1040 NEXT n 

1050 RETURN 


o jest praktycznie wszystko, do czego można wykorzy¬ 
stać kanały posługując się wyłącznie BASICuem. Szersze 
ich wykorzystanie jest możliwe dopiero przy pomocy 
asemblera i procedur umieszczonych w ROM-ie Nie zna¬ 
czy to jednak, że w BASIC-u niczego więcej juz się nie da 
zrobić — można przecież napisaną w asemblerze proce¬ 
durę obsługi kanału włączyc do programu w BASIC-u 
umieszczając ją w liniach DATA lub wczytując ją z taśmy 
przez LOAD ”” CODĘ. Po wpisaniu kilku instrukcji POKE 
„podłączających” naszą procedurę do istniejących kana¬ 
łów można już z niej korzystać przez PRINT, LIST czy IN 
PUT. Tym, jak to dokładnie robie zajmiemy się w drugiej 
części tego artykułu, za miesiąc. 

W tym języku drukowanie jest trochę bardziej skompli¬ 
kowane, me ma bowiem instrukcji odpowiadającej dokład¬ 
nie PR NT-owi Podczas działania programu, po rozpozna¬ 
niu przez interpreter BASiC-a tej instrukcji, wykonywany 
jest szereg procedur, a me jakaś jedna załatwiająca od 
razu wszystko. Pierwszą z nich jest CHAN-OPEN znajdu¬ 
jąca się pod adresem 5633, a służąca do otwarcia kanału 
dla wydruku. Otwarcie me oznacza tu tego samego co w 
BASIC-u, gdyż tam było to przypisanie strumieniowi kana¬ 
łu — tutaj jest to tylko znalezienie i zapamiętanie kanału o 
podanym numerze. Przed wywołaniem tej procedury w 
akumulatorze umieszczamy numer otwieranego kanału. 
Liczba ta jest zapisana w kodzie U2 tzn. gdy jest u emna 
lecz większa od -129, to aby uzyskać jej zapis w tym ko¬ 
dzie dodajemy do niej 256, a gdy dodatnia lecz mniejsza 
od 128, to piszemy ją tak jak w zapisie dziesiętnym. 

Jeśli otworzyliśmy juz kanał, to możemy zabrać się do 
drukowania. Podstawową procedurą wyprowadzającą po¬ 
jedynczy bajt informacji w używanym właśnie kanale jest 
podprogram umieszczony pod adresem 16, który można 
wywoływać przez CALL 16, lub prościej przez RST 16. 
Procedura ta wysyła w otwartym wcześniej kanale znak, 
którego kod znajduje się w akumulatorze. Aby więc np 
wydrukować w górnej części ekranu literę „A” możemy 
wpisać taki program: (jeśli me masz wczytanego asemble¬ 
ra, to użyj programu przedstawionego na końcu. 
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Najpierw otwieramy kanał przypisany strumieniowi -2 czyli 
S. a potem wysyłamy w mm kod litery „A". Jeśli chcemy 
teraz wydrukować w kanale S następny znak, to nie musi¬ 
my go ponownie otwierać Każdy kanał pozostaje otwarty 
aż do momentu gdy otworzy się inny kanał. 

Jeśli chcemy wydrukować jakiś dłuższy tekst, to wysyła¬ 
nie każdego znaku osobno nie jest zbyt wygodne. Na całe 
szczęście w ROM-ie znajduje się kilka podprogramów, 
które mogą nas w tym wyręczyć. Pierwszym z nich jest 
podprogram umieszczony pod adresem 8252 Drukuje on 
tekst, ktorego długość podajemy w parze rejestrów BC, a 
adres pierwszego znaku w parze HL DE. Tekst ten może 
składać się z dowolnych znaków o kodach od O do 255 
Ponieważ wszystkie te podprogramy mogą działać w róż¬ 
nych kanałach, więc przed wywołaniem każdego z nich 
musimy pamiętać o otwarciu odpowiedniego kanału 


3E 02 
CD 01 16 
11 A2 09 
01 1E OO 
CD 3C 20 
C9 


LD A,2 ;numer strumienia 

CALL 5633 ;otwarcie kanału S 

LD DE,2466 ;adres łańcucha 
LD BC,30 ;długość 

CALL 8252 ;wydruk napisu 

RET ;powrót 


Drugą z procedur drukujących teksty jest procedura 
umieszczona pod adresem 3082. Drukuje ona tylko łańcu¬ 
chy złożone ze znaków o kodach O 4- 127 lecz za to mo¬ 


żemy umieścić w pamięci jeden za drugim do 256 łańcu¬ 
chów me martwiąc się o adres ani długość każdego z nich 
W bajcie pamięci tuz przed pierwszym łańcuchem, 
umieszczamy liczbę większą niz 127 a za mą tekst pierw 
szego łańcucha Aby zasygnalizować gdzie jest jego ko¬ 
niec, do kodu jego ostatniego znaku dodajemy 128. Zaraz 
po tym bajcie może znajdować się początek następnego 
łańcucha zapisanego w identyczny sposob Chcąc teraz 
wydrukować któryś z tych tekstów, w parze rejestrów DE 
umieszczamy adres bajtu poprzedzającego pierwszy 
tekst, a w akumulatorze podajemy, który z nich ma być 
wydrukowany Jest to liczba z zakresu O -s- 255, gdzie O 
oznacza pierwszy łańcuch 1 — drugi itd. W ROM le znaj¬ 
duje się kilka blokow takich „upchniętych” tekstów Spró 
bujmy wyświetlić zawartość jednego z nich, zawierającego 
wszystkie komunikaty o błędach 


3E 

02 


LD A, 2 

;numer strumienia 

CD 

01 

16 

CALL 5633 

;otwarcie kanału S 

AF 



XOR A 

;wyzerowanie rej. A 

F5 



PUSH AF 

;zapamiętanie stanu A 

11 

91 

13 

LD DE,5009 

;adres bajtu przed 





t pierwszym tekstem 

CD 

OA 

OC 

CALL 3082 

;druk tekstu o num. A 

3E 

OD 


LD A,13 

;przejście do nowej 

D7 



RST 16 

; linii (druk ENTER) 

FI 



POP AF 

;odtworzenie stanu A 

3C 



INC A 

;następny tekst 

FE 

1E 


CP 30 

;powrót jeśli był 

DO 



RET NC 

; juź 30-ty tekst 

18 

EF 


JR -17 

;skok do PUSH AF 


Przeanalizuj działanie tego programu i porównaj wydruko¬ 
wane napisy z zawartością obszaru 5009—5460 (sprawdź 
to przez PEEK .. i CHR$ PEEK ) 

Jeżeli w A znajduje się liczba od O do 9 to mozesz ją 
wydrukować przez CALL 5615 — jest to równoznaczne z 
ADD,A,48 (kod znaku „O") przez RST 16. Jeśli zaś 
chcesz wydrukować liczbę większą mz jednocyfrową ale 
mniejszą niż 10 000 to mozesz ją umieścić w parze BC 
oraz wykonać podprogram znajdujący się pod adresem 
6683. 

Jeśli i taki zakres ci nie wystarcza, to musisz posłużyć 
się procedurami tzw kalkulatora Jest to ta część inter¬ 
pretera BASIC-a, która zajmuje się wszelkimi obliczenia¬ 
mi, a do przechowywania liczb wykorzystuje specjalny ob¬ 
szar pamięci — „CALCULATOR STACK” — czyli „stos 
ka.kulatora’ Za pomocą procedur kalkulatora można trzy¬ 
mane na stosie liczby dodawać, odejmować, mnożyć, po¬ 
tęgować. traktować jako argumenty różnych funkcji itp. 
Można także wydrukować wartość liczby znajdującej się 
na szczycie tego stosu. Nam wystarczą tylko dwa podpro¬ 
gramy pierwszy — który zapisze liczbę z rejestrów mikro¬ 
procesora na szczyt stosu, drugi — który ją wydrukuje 

Aby wpisać na liczbę na stos, umieszczamy ją w parze 
rejestrów BC oraz wywołujemy podprogram o adresie 
11563 Teraz otwieramy odpowiedni kanał i drukujemy za¬ 
pisaną na stosie liczbę przez CALL 11747: 


Ol 39 30 
CD 2B 2D 
3E 02 
CD 01 16 
CD E3 2D 
C9 


LD BC,12345 
CALL 11563 
LD A, 2 
CALL 5633 
CALL 11747 
RET 


;zapisanie liczby 
; 12345 na stos kal. 

;numer strumienia 
;otwarcie kanału S 
5 druk liczby ze szczy- 
; tu stosu i powrót 


Te podprogramy umożliwiają wydrukowanie praktycznie 
dowolnego tekstu czy liczby w wygodny dla piszącego 
program w asemblerze sposób. Są one odpowiednikami 
instrukcji PRINT na poziomie asemblera. Te procedury są 
konieczne aby móc korzystać z kanałów w asemblerze 
oraz aby zrozumieć w jaki sposób za pomocą własnych 
programów zaprząc kanały do jakiejś pożytecznej pracy, 
np. ulepszać działanie PRINT-a w BASIC-u lub nawet za¬ 
bezpieczać swe programy przed wylistowaniem, ale o tym 
w drugiej części, za miesiąc. 

Tomasz Surmacz 


Program umożliwiający uruchomienie przykładowych pro¬ 
gramów w asemblerze: 


1 REM uruchamianie przykładów w 
asemb1 er z e 

lO CLEAR 59999: LET x=60000 
20 READ a , b , c , d , e ,-f 
30 DATA 10,11,12,13,14,15 
40 READ a* 

50 FOR n = 1 TO LEN a* STEP 2 
60 POKE x,VAL a$(n)*16+VAL ai(n+l) 
70 LET x=x+l: NEXT n 
80 RANDOMIZE USR 60000 
85 REM umieść kod szesnastkowy 
programu w linii 90 DATA 


np 90 DATA ..3EFECD01163E41 D7C9” 


-i A 



KLAN SPECTRUM 


EDYTOR ZNAKÓW GRAFICZNYCH 


Prezentowany program umożli¬ 
wia szybkie zaprojektowanie ze¬ 
stawu 96 znaków o kodach ASCII 
32 do 127 i znaków graficznych 
użytkownika. 

Po uruchomieniu programu przez RUN należy od¬ 
czekać chwilę, aż w odpowiednim obszarze RAM 
umieszczone zostanę procedury maszynowe Następ¬ 
nie pojawi się pytanie czy wczytać dane z taśmy mag¬ 
netofonowej a pozn ej plansza prezentująca poprawia¬ 
ny zestaw znaków i ich odpowiedniki w kodzie ASCII, 
menu oraz edytowany znak w wielkości naturalnej i po¬ 
większony 8 razy. W programie możliwa jest realizacja 
kilkunastu funkcji wybieranych naciśnięciem odpowie¬ 
dniego klawisza 

WYŚWIETLANIE (klawisze 1—8) — poprawianie do¬ 
wolnego wiersza aktualnie wyświetlanego znaku. Po¬ 
prawkę podajemy w postaci tekstu, w którym spacje 
oznaczają punkt w kolorze tła a wszystkie pozostałe 

znaki zamień ane są na punkty w kolorze pap eru 
OBROT W LEWO (klawisz L) — obróceń e aktualnie 

wyświetlanego znaku w lewo. 

OBRÓT W PRAWO (klawisz R) — obrócenie aktualnie 
wyświetlanego znaku w prawo 
ODBICIE LUSTRZANE (klawisz O) — odbicie lustrza¬ 
ne aktualnie wyświetlanego znaku. 

ODB C E Z OBRO EM (klawisz P) — przekształcenie 
złożone z odbicia i obrotu. 

KODOWANIE (klawisz K) — zakodowanie aktualnie 
wyświetlanego znaku w edytowanym zestawie 
SUMA (klawisz S) — zsumowanie aktualnie wyświetla¬ 
nego znaku z dowolnym innym z wyjątkiem znaków o 
kodach ASCII od 128 do 143. 

ZAPIS (klawisz Z) — zapisanie utworzonego zbioru 96 
znaków na taśmie magnetofonowej 
PRZESUNIĘCIE W LEWO (klawisz X) — przesuń ęcie 
w lewo aktualnie wyświetlanego znaku. Lewa kolumna 
punktów jest kasowana 

PRZESUNIĘCIE W PRAWO (klawisz M) — przesunię¬ 
cie w prawo aktualnie wyświetlanego znaku Prawa ko¬ 
lumna punktów jest kasowana 
P ZESUNIĘCIE W GÓRĘ (klawisze LXR) — przesu¬ 
nięcie w górę aktualnie wyświetlanego znaku zrealizo¬ 
wane przez wykonanie trzech poprzednio opisanych 
funkcji. 

P (ZESUNIĘCIE W DOŁ (klawisze LMR) — przesumę 
cie w dół aktualnie wyświetlanego znaku 
Utworzony zestaw 96 znaków graficznych może za 
stąpić znaki standardowe, które zapisane są w pamięci 
ROM Należy umieścić go w wybranym miejscu pamię¬ 
ci RAM wykonując rozkazy: 

CLEAR adr-1 LOAD nazwa” CODĘ adr, 768 
Po wykonaniu tej czynności musimy zmienić wartość 
zmiennej systemowej CHARS która informuje system 
o położeniu generatora znaków w pamięci. Realizuje¬ 
my to przez: 

POKE 23606 I POKE 23607,h 
Wartości I i h obliczamy ze wzorow I =x - 256 * INT 
(X/256) oraz h = IN (X/256) gdzie X = adr - 256 
Program umieszcza dane o edytowanych znakach 
od adresu adr = 64472 Efekt naszej pracy widoczny 
jest na ekranie po wpisaniu POKE 23606 216 POKE 
23607,250 (lima 6540) Powrot do standardowego ge¬ 
neratora następuje po wykonaniu POKE 23606,0 
POKE 23607,60. Podczas testowania edytora utworzo¬ 
no zestaw pogrubionych liter i cyfr, które znacznie po¬ 
prawiają czytelność wyświetlanych tekstów. 

Program składa się z czterech zasadniczych części: 

1 linie 1—112 — wczytanie procedur maszyno¬ 

wych 

2 linie 120—200 — inicjalizacja zmiennych, przepi¬ 

sanie generatora znaków z 
ROM, wczytanie danych z taś¬ 
my, wydruk planszy 

3. linie 210—300 — główna pętla sterująca progra¬ 
mu 

4 linie 4999—7550 — procedury realizujące posz¬ 
czególne funkcje. 

Użytkownik może łatwo wzbogacić program o włas¬ 
ne procedury dodając w pętli głównej wywołanie kolej¬ 
nej opcji. Proponuję samodzielne dopisanie procedury 
edycji znaku za pomocą manipulatora Nie wolno zmie¬ 
niać linii 6545, gdyż wszystkie przekształcenia i wy¬ 
świetlanie wymaga uprzedniego wydrukowania znaku 
przez PRINT AT 17,21 , „Z$ Poprawianie odbywa się 
przez bezpośrednie wpisywanie odpowiednich wartoś¬ 
ci do pamięci obrazu przez POKE np Isnia 6430 lub 
pętla 7150—7170 T T , 

Janusz Jarmoch 


i 

ł REM EDYTOR ZNAKOM GRAFICZNYCH 
3 CLEAR 64463: LET A=65239 
9 REM PROCEDURY MASZYNOWE 
10 PRINT AT lOjlOj-mZACZEKAJHI" 

20 FOR KM 00 TO 112 
30 LET S=0 
40 FOR LM TO 10 

50 LET A=A+i: READ B: POKE A,B: LET S=S+B 
60 NEXT L 

70 READ SK: IF SOSK THEN PRINT "BtflD W ";K 
80 NEXT K 

100 DATA 33,53,80,17,208,250,229,205,57,255,1387 

101 DATA 225,14,8,221,33,208,250,6,8,221,1194 

102 DATA 203,0,46,203,22,221,35,16,246,36,1028 

103 DATA 13,32,236,33,53,80,17,7,89,14,574 

104 DATA 8,6,8,175,62,63,203,22,48,2,597 

105 DATA 62,0,18,19,16,244,203,22,36,62,682 

106 DATA 24,131,95,13,32,231,201,33,0,61,821 

107 DATA 17,216,251,1,0,3,237,176,201,33,1135 

108 DATA 0,0,17,216,250,41,41,41,25,17,648 

109 DATA 53,80,235,201,205,39,255,6,8,126,1208 

110 DATA 18,36,19,16,250,201,205,39,255,6,1045 

111 DATA 8,26,79,126,177,119,36,19,16,247,853 

112 DATA 24,167,118,27,3,19,0,62,0,60,480 
120 DIM BI(8) 

140 DIM W$(96) 

150 FOR KM TO 96: LET N$(K)=CHR$ (K+31): NEXT K 
160 RANDOMIZE USR 65307 

170 PRINT 10;“CZY WCZYTAĆ DANE Z TAŚMY ? T-N 1 
180 GO SUB 6010 

190 IF S*="T" THEN GO SUB 7300 
195 CLS 

200 60 SUB 5000: 60 SUB 5100: REM WYDRUK PLANSZY 
210 REM PĘTLA GŁÓWNA 
220 60 SUB 6000 

230 IF S$>"0" AND S$<“9* THEN 60 SUB 6400 

240 IF S$=“W“ THEN 60 SUB 6500 

245 IF Si=“K" THEN 60 SUB 6600 

250 IF S$=“L“ THEN 60 SUB 6700 

255 IF S$="X“ THEN 60 SUB 7150 

260 IF S$=“R“ THEN 60 SUB 6800 

265 IF S$="P" THEN 60 SUB 6830 

270 IF S$=“0“ THEN 60 SUB 6790 

275 IF S$=“S“ THEN 60 SUB 7000 

290 IF S$="Z“ THEN 60 SUB 7500 

295 IF Si=“M- THEN 60 SUB 7100 

300 60 TO 220 

4999 REM WYDRUK GENERATORA ZNAKÓW 

5000 LET H=1 


5010 F0KE 23606,216: POKE 23607,250: 60 SUB 5030 
5015 POKE 23606,0: POKE 23607,60 
5020 LET M=0 

5030 PRINT AT 0+M,0;WN TO 32);AT 2+M,G;W$(33 TO 64) 
5035 PRINT AT 4+H,0;W$(65 TO ) 

5040 RETURN 

5100 REN PLANSZA 

5110 FOR K=1 TO 8 

5120 PRINT AT 7+K,5;K;AT 17,6+K;K 

5130 NEXT K 

5135 PLOT 55,112: DRAŃ 65,0: DRAŃ 0,-65 

5136 DRAW -65,0: DRAW 0,65 

5150 PRINT AT 16,20;AT 17,20;"I •■{AT 1B,20;'W 


5160 PRINT AT 8,16,•'WYŚWIETLANIE...W 
5170 PRINT AT 9,16;'POPRAWIANIE..1-8* 


5180 PRINT AT 10,16;'OBRÓT.L.R' 

5190 PRINT AT 11,16;“ODBICIE.0.P' 

5200 PRINT AT 12,16;'KODOWANIE.K' 

5210 PRINT AT 13,16;'SUMA.S' 

5220 PRINT AT 14,16;'ZAPIS.Z' 


5230 PRINT AT 15,16;-PRZESUNIĘCIE.X.M' 

5250 RETURN 

5999 REN WCZYTAJ ZNAK Z KLAWIATURY 

6000 PRINT 10;* WYBIERZ POZYCJE l MENU ' 

6010 LET SI=INKEY$: IF S$<' " THEN 60 TO 6010 
6020 IF Sl> s 'a* THEN LET S$=CHR$ (C0DE S4-32) 

6025 INPUT " 

6030 RETURN 

6399 REN POPRAW WIERSZ 

6400 INPUT ' 12345678 ';BI 

6403 LET S=0 

6405 FOR K=T TO 8 

6410 LET M=0: IF BNK)<>' ' THEN LET M=1 
6415 LET S=St2+M 
6420 NEXT K 

6430 POKE 20533+2561(VAL S*-1),S 
6450 RANDOWI ZE USR 65273 
6460 RETURN 

6500 REM WYŚWIWETLAlłft ZNAKU 

6510 INPUT 'JAKI ZNAK WYŚWIETLIĆ ? LINĘ Z$ 

6520 LET Z*C0DE Ii 

6530 IF Z<32 0R Z>164 THEN 60 TO 6510 

6540 POKE 23606,216: POKE 23607,250 

6545 PRINT AT 17,21;CHR$ Z: POKE 23606,0: POKE 23607,60 

6550 RANDOMIZE USR 65273 

6560 RETURN 

6600 REM KODOWANIE 

6610 INPUT 'JAKI ZNAK ZAKODOWAĆ ? '; LINĘ Z$: LET Z*C0DE Z! 

6620 IF Z<32 0R (Z>127 AND Z<144) 0R Z>164 THEN RETURN 

6630 POKE 65320,Z 

6640 RANDOMIZE USR 65334 

6650 60 SUB 5000 

6660 RETURN 

6699 REM PRZEKSZTAŁCENIA 

6700 POKE 65262,46: POKE 65264,22 
6710 60 TO 6950 

6790 60 SUB 6840 

6800 POKE 65262,38: POKE 65264,30 
6810 60 TO 6950 

6840 POKE 65262,38: POKE 65264,22 
6950 RANDOMIZE USR 65240 
6960 RETURN 

6999 REM SUMOWANIE 2 ZNAKÓW 

7000 INPUT*' JAKI ZNAK DOPISAĆ ? '; LINĘ Z$: LET Z=C0DE Z$ 
7010 IF Z<32 0R Z>127 AND Z<144 0R Z>164 THEN RETURN 
7020 POKE 65320,Z: RANDOMIZE USR 65346 

7030 RETURN 

7099 REM PRESUNięCIE W PRAWO 

7100 FOR K*20533 TO 22325 STEP 256 
7110 LET L=INT (PEEK K/2); POKE K,L 
7120 NEXT K: RANDOMIZE USR 65273 
7130 RETURN 

7149 REM PRZESUNIECIE W LEWO 

7150 FOR M20533 TO 22325 STEP 256 

7160 LET L=2tPEEK K: IF L>255 THEN LET L=L-256 
7165 POKE K,L 

7170 NEXT K: RANDOMIZE USR 65273 
7180 RETURN 

7299 REM WCZYTANIE DANYCH Z TAŚMY 

7300 INPUT 'PODAJ NAZWĘ ZBIORU *;N«: IF N*=" THEN RETURN 
7320 LOAD NłCODE 64472,768 

7340 PRINT 10; 'ZATRZYMAJ TAŚMĘ - NACIŚNIJ DOWOLNY KLAW 
ISZ ' 

7350 PAUSE 0: RETURN 

7500 REM ZAPIS DANYCH NA TAŚMĘ 

7510 INPUT 'PODAJ NAZWĘ ZBIORU';NI: IF N*=" THEN RETURN 

7520 SAVE NIC0DE 64472,768 

7550 60 TO 7340 
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ZAPIS. 
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R$ (K+31) : NE>'T K 
160 RDNDONIZE USR 653 OT 
170 PRINT 80 J M C2V NCZVTRC DRNE 
Z T OS11V ■? T-N ” 

ISO GO SUB EOIO 

130 IF S$=”T" THEN GO SUB 7300 
195 CLS 

200 GO SUB 5000: GO SUB 5100: P 
Eli UVDRUK PLflNSZ V 
210 REN PETLfi GŁODNO 


. u 

220 

230 

CO 

IF 

SUB EOOO 
5t> M 0 M AND 


M Q K 

THEN 

O 

. R 
. P 

K 

O SUB 
240 

6400 

IF 5$ = "IJ 

p r 

THEN 

GO 

SUB 

6500 

245 

I F 

S $ = 

pp 

THEN 

GO 

SUB 

6600 

■ l\ 

■e 

250 

I F 

S$ = ”L 

pp 

THEN 

CO 

SUB 

6700 

" "T 

255 

IF 

S$ = ”X 

pp 

THEN 

CO 

SUB 

7 150 

; m 

260 

I F 

S$ = "R 

pp 

THEN 

GO 

SUB 

6800 


265 

IF 

S$ = "P 

pp 

THEN 

GO 

SUB 

6830 


270 

IF 

S$ = ”0 

pp 

THEN 

GO 

SUB 

6790 


275 

IF 

S$ = "S 

pp 

THEN 

GO 

SUB 

7 O0O 


290 

IF 

S$ = ”Z 

pp 

THEN 

GO 

SUB 

7500 


Wygląd planszy programu 


Fragment listingu drukowanego pogrubionymi literami. 
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PRZERWANIE 
W ZX SPECTRUM 


Ze względu na konieczność 
programowania pamięci EP- 
ROM prezentowany układ pole¬ 
cany jest do wykonania bar¬ 
dziej zaawansowanym w tych 
pracach Czytelnikom. 

Kilka błędów w oprogramowaniu ROM-u ZX 
SPECTRUM może spraw c czasem trochę kłopotu 
Chyba najważniejszym z błędów jest zła zawartość 
komorki o adresie 112 w której zamień ono kod E9 
(dziesiętnie 233) kodem El (dziesiętnie 225) 
Uniemożliwia to wykorzystanie przerwania niemas- 
kowalnego NMI, ponieważ zamiast rozkazu JP (HL) 
znajduje się rozkaz POP HL. Przerwanie NMI przyj¬ 
mowane jest przez mikroprocesor w każdym mo¬ 
mencie a program jego obsługi może byc umiesz¬ 
czony w określonym przez programistę miejscu 
pamięci RAM Daje to duże możliwości np skopio¬ 
wanie ekranu w dowolnym momencie gry itp 

Rozwiązanie układowe jest rozwinięciem wcześ¬ 
niej prezentowanego przy opisie wykorzystania 
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wolnej części pamięci ROM w jednym z poprzed¬ 
nich numerów „BAJTKA Zastosowana w rozwią¬ 
zaniu pamięć PROM 2716 umożliwi wprowadze¬ 
nie poprawionej zawartości komorki o adresie 112, 
wykorzystanie 1166 bajtów wolnego obszaru 
ROM u oraz ewentualne przeprogramowania ge¬ 
neratora znaków 

Istota rozwiązania przedstaw onego na rys 1 po¬ 
lega na zdekodowamu adresu 112 w momencie 
odwoływania się systemu do komórki ROM-u o tym 
adresie wyłączeniu ROM u sygnałem ROMCS^na 
moment pobierania rozkazu z tej komorki i uaktyw¬ 
nieniu EPROM u sygnałem CE, w ktorego komorce 
o adresie bezwzględnym 112 wstawiono kod E9 
[instrukcja JP (HL)] Dodatkowo układ dekodera 
umożliwia wyłączenie ROM-u i zastąpienie go 
EPROM em w momencie gdy na mag strali adre¬ 
sowej pojawi się adres większy od 14445 
Wykorzystując NMI należy pamiętać, ze w chwili 
podania sygnału przerwania nastąpi skok do pod 
programu obsługi NMI, ktorego adres nafezy umie¬ 
ścić w zmiennych systemowych o adresach 23728 
i 23729 Podprogram obsługi NMI musi konczyc 
się rozkazami- 
POP HL 
POP AF 
RETN 

ab umożliwić bezkolizyjny powrot do wcześniej wy¬ 
konywanego programu Sposob zaprogramowania 
EPROM-u przedstawia tabela 1 Ponieważ EPROM 
umieszczony jest w przestrzeni adresowej od 
14336 do 16383, dlatego częsc ROM u od adresu 
14336 do 14445 włącznie należy przekopiować do 
EPROM u W obszarze tym znajduje się częsc in¬ 
terpretera języka BASIC W komórce o adresie 
bezwzględnym EPROM-u 112 należy wpisać war¬ 
tość 233 Obszar od adresu 113 do 1279 można 
wypełnić własnym oprogramowaniem, natomiast 
generator znaków rozpoczynający się w ROM ie od 
adresu 15616 do 16383 można przekopiować lub 
zaprogramować na nowo Układ wg schematu ide¬ 
owego należy zmontować na płytce z obwodem 
drukowanym i za pomocą złącza krawędziowego 
połączyć z mikrokomputerem 

Konrad Fedyna 
Zygmunt Wereszczyński 
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10 PRINT "WODOR - MODEL STUDNI 
FOTENCJALOWseria 

seria: LYMaNA BAL 

MERA FA5HENA t 

f *0.7"'TAB 6; "t 
f 2.6"'" 12.7 v 
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Program „Elektron w studni” z numeru 4 „Bajt- 
ka ukazał s ę przez pomyłkę bez podpisu, za co 
serdecznie przepraszamy autora, Michała Mała¬ 
chowskiego i wszystk ch czytelników Artykuł był 
zresztą szczególnie pechowy — n em ły figiel spła¬ 
tała nam drukarka wstaw ając w listingu niepotrzeb¬ 
ne spacje Na szczęście me ma to większego wpły¬ 
wu na działanie programu, z wyjątkem linii 10 któ¬ 
rej prawidłową postać przedstawiamy pomzej 



Wykonanie tego układu 
wymaga znajomości pod¬ 
staw techniki mikroproce¬ 
sorowej i programowania w 
kodzie maszynowym, więc 
polecane jest bardziej zaa¬ 
wansowanym w takich pra¬ 
cach czytelnikom. 





M krokomputer ZX SPECTRUM wy¬ 
posażony jest w 16 KB pamięci ROM 
w której umieszczono między innymi 

interpreter języka BASIC i generator 
znaków Oprogramowanie znajdujące 
się w ROM-ie nie zajmuje jednak całej 
przestrzeni adresowej tzn 16384 baj¬ 
tów lecz tylko jej część Wolna częsc 
pamięci ROM to 1170 bajtów począ¬ 
wszy od adresu 14446 do 15615. In¬ 
terpreter języka BASIC kończy się na 
komorce o adresie 14445, a od adre¬ 
su 15616 do 16383 znajduje się ge¬ 
nerator znaków Możliwość wykorzy¬ 
stania wolnych 1170 bajtów pamięci 
stałej daje wiele ciekawych możliwo¬ 
ści np można umiesctc tam program 
obsługi drukarki itp 
Przykładowe rozwiązanie tego pro¬ 
blemu przedstawiono na rys 1 W 
konstrukcji wykorzystano pam ęc EP¬ 
ROM typu 2716 która umieszczona 
jest w przestrzeni adresowej ROM -u 
od adresu 14336 do 16383 Pokrywa 
więc ostatnie 2 KB standardowego 
ROM-u SPECTRUM Po zdekodowa- 
mu adresu większego od 14335 przez 
układ dekodera zbudowanego przy 
pomocy układu UCY 74S405 produk¬ 
cji krajowej, wyłączany jest ROM ZX 
SPEC1 RUM za pomocą sygnału 
ROMCS i jednocześnie uaktywniany 
jest EPROM przy pomocy sygnału CE 
Funkcję wyłączonego ROM u przej¬ 
muje wtedy zaprogramowany przez 
nas EPROM Z uwagi na to ze inter¬ 
preter języka BASIC kończy się na 
adresie 14445, więc częsc ROM-u od 
adresu 143Ś6 do 14445 należy prze¬ 
kopiować do EPROM-u Zajmie to ob¬ 
szar w wartościach bezwzględnych 
EPROM u od 0 do 109 Następne 
1170 bajtów tej pam ęci można wyko 
rzystac do umieszczenia własnego 
oprogramowania Przy okazj mamy 
szansę zmiany kształtu znaków ZX 
SPECTRUM przez zaprogramowan e 
nowego generatora znaków Standar¬ 
dowo zajmuje on obszar 768 bajtów 
od adresu 15616 Gdy zm any gene 
ratora znaków nie przewidujemy, na 
leży przekopiować obszar ROM-u od 
adresu 15616 do 16383 Tak przygo 
towany EPROM należy umiescic w 
podstawce na płytce z obwodem dru¬ 
kowanym wykonanym wg schematu 
ideowego Całość łączymy z mikro¬ 
komputerem za pomocą złącza kra¬ 
wędziowego 



Konrad Fedyna 
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O interpreterze tym krąży juz sporo mitów i le¬ 
gend Przy okazji warto zauważyć, ze krąży 
również kilka wersp tego programu, które 
co tu ukrywać — zostały skradzione jego tworcom na 
wcześniejszych etapach produkcji i co za tym idzie są 
niewykończone i obarczone błędami, 

WARSAW BASIC me jest następną próbą ułatw ema 
życia amatorom gier czy rozwiązaniem problemów z 
uzyskiwaniem dźwięku na C 64 — wprowadza on w e- 
le tak-ch elementów jakie dostępne są praktycznie wy¬ 
łącznie na maszynach profesjonalnych, co z kolei zbli- 
za użytkownika do „dorosłej" problematyki informaty¬ 
cznej, do języków stosowanych powszechnie jedynie 
na maszynach dużych 

Autorami Warsaw Basic-a są dwaj warszawscy ma¬ 
tematycy Krzysztof Gajewski i Bogusław Radziszewski 
z Instytutu Podstawowych Problemów Techniki Dzięki 
ich uprzejmości ,BAJTEK” otrzymał do testowania 
najnowszą wersję — WARSAW BASIC 3 2, zapisaną w 
pamięci EPROM wraz z dyskietką na której zawarte 
były procedury uzupełniające Oprócz tego otrzymaliś¬ 
my także dobrze wykonaną instrukcję obsług która w 
jasny, konkretny i rzeczowy sposob wprowadza Czytel¬ 
nika w możliwości tego języka 

Na pierwszy rzut oka WARSAW BASIC przypomina 
SIMONS BASIC Złudzenie mija jednak szybko, w kil¬ 
ka minut po uruchomieniu programu demonstracyjne¬ 
go SIMON S BASIC ułożył 14-letni chłopc ec, WAR¬ 
SAW BASIC opracowali natomiast zawodowi matema¬ 
tycy Z tego powodu istnieją duże różnice zwłaszcza w 
kierunku rozszerzenia jak tez i możliwościach obu tych 
interpreterów Walory WARSAW BASIC a czynią go 
wprost idealnym językiem dla zastosowań matematy¬ 
cznych i edukacyjnych, z wyraźnym ukierunkowaniem 
na te drugie 



Nieczęsto się zdarza, żeby program trafiający w ręce użytkownika spełniał 
wszystkie pokładane w nim nadzieje, wszystkie wymagania. W przypadku po¬ 
szczególnych dialektów BASIC dla Commodore 64 jest to sprawa szczególnie 
ważna, gdyż jak wiadomo, zaimplementowany na C 64 BASIC V2.0 daleki jest 
od doskonałości. Stąd też na rynku pojawiło się wiele rozszerzeń tego inter¬ 
pretera — SIMON S BASIC, METABASIC, ULTRABASIC, pMIKRON BASIC i 
wiele innych. Ich twórcy starali się jednakże o rozszerzenie tylko niektórych 
możliwości komputera — np. graficznych czy muzycznych — dodając jakby 
„przy okazji” kilka funkcji i instrukcji poprawiających oryginalny edytor C-64. 
Jest wszakże jeden interpreter, którego autorzy poszli w zupełnie innym kierun¬ 
ku tworząc wersję języka BASIC zamieniającego Commodore 64 w maszynę 
prawie profesjonalną — WARSAW BASIC. 


PROCEDURY 

Podstawowym argumentem przeciwników wszel¬ 
kich odmian BASIC a jest brak możliwości programo¬ 
wania strukturalnego i możliwości tworzenia procedur 
WARSAW BASIC daje programiście te możliwości i 
chocby z tego jedynie powodu plasuje się w rzędzie 
najbardziej nowoczesnych języków programowania 
wysokiego poziomu zaimplementowanych na kompu¬ 
terach osmio-bitowych Zachowuje przy tym wszystkie 
cechy BASIC a ; od ktorego — czy się nam to podoba, 
czy tez me — rozpoczyna edukację większa częsc 
programistów 

Procedury stanowią również rozwiązanie dla tych 
wszystkich, którzy potrzebują więcej pamięci do swoich 
zastosowań, o wiele więcej mz C 64 jest w stanie dac. 
Zamiast umieszczać w programie wszystkie niezbędne 
do jego wykonania bloki funkcjonalne, możemy stwo¬ 
rzyć jedynie program który w danej chwili gdy blok ten 
ma byc wykonany będzie go wczytywał do pamięci z 
dyskietki czy kasety O zaletach takiego rozwiązania w 
zasadzie me trzeba mowie więcej — program korzysta¬ 
jący z procedur zajmuje znacznie mniej pamięci, jest 
bardziej czytelny i przejrzysty, szybszy w działaniu 
Ponieważ procedur nam potrzebnych możemy stwo¬ 
rzyć tle dusza zapragnie, me jesteśmy limitowani poje¬ 
mnością pamięci Zbiór procedur bibliotecznych na dy¬ 
sku A możemy w każdej chwili zastąpić dyskiem B Je¬ 
śli poszukiwanej przez nas procedury me ma na włożo¬ 
nym do stacji dysku, to WARSAW BASIC me powoduje 
przerwania wykonywania programu i powrotu do trybu 
ekranowego; zamiast tego wyświetlany jest komunikat 
o braku takiej poszukiwanej procedury i żądaniu zmia¬ 
ny dyskietki 

Każdy program może więc byc bardzo krotki co z 
kolei stwarza możliwości jego rozbudowy jakich me 
mieliśmy do tej pory w żadnym interpreterze BASIC-a 
(wszystkie bloki funkcjonalne programu musiały byc 
umieszczone w mm na stałe) W ten sposob zdjęto 
z programistów jeden z największych i najbardziej 
kłopotliwych ciężarów występujących zwykle w pracy 

z mikrokomputerami — ograniczenie pojemności pa¬ 
mięci 

Nie koniec na tym Procedury można nakładkować, 
zagmezdzać, integrować w pakiety Autorzy pomyśleli 
tu chyba o wszystkim, gdyż istnieje także możliwość 
tworzenia bloku wspólnego, deklarowania zmiennych 
lokalnych i parametrów formalnych W samym progra¬ 
mie procedurę można wywołać zarówno nazwą jak tez 
i numerem linii; podczas jego pracy możliwe jest łą¬ 
czenie poszczególnych procedur np wczytywanych z 
dyskietki 

Malkontenci mogliby zarzucić, ze współpraca C 64 
ze stacja dysków jest bardzo powolna I ten zarzut 
WARSAW BASIC odpiera łatwo — jest on wyposażony 
w specjalną procedurę przyspieszającą współpracę z 
dyskiem czterokrotnie 


POLSKIE LITERY 

Tekst, który zamierzamy wyświetlić na ekranie bądź 
wydrukować na drukarce może być złozony z dowol¬ 
nych, zaprogramowanych przez użytkownika zna¬ 
ków, które to procedury mogą byc rzecz jasna, zapisa¬ 
ne na dyskietce lub taśmie Oczyw.scie istnieje możli¬ 
wość pracy z polskim alfabetem jak tez i jakimkolwiek 
innym — odpowiedni zestaw może byc w dolnym miej¬ 
scu programu zm emony na inny Koniec z komunika¬ 
tami typu BLAD SKŁADNI czy ZADANIE KA A NA 
LACE Koniec ze sztuczkami, z dziesiątkami POKE i 
innymi proceduram zastępczymi umożliwiającymi two¬ 
rzenie własnych zestawów. Znaki raz zapisane mogą 
być w elokrotme zmień ane w program e, podobnie jak 
i krój czcionki Wszystkie zaprogramowane wcześniej 
zestawy czy alfabety mogą być wyprowadzone zarów¬ 
no na ekran jak i na drukarki typu MPS 801—803, 
STAR GEMINI i inne (bez względu na to czy są podłą¬ 
czone do portu szeregowego czy tez do RS 232) 

Zaleta ta może — moim zdaniem — zaspokoić wy¬ 
magań a nawet najbardziej wybrednych filoiogow Za 
pomocą poniżej opisanych procedur można tworzyć 
bardzo rozbudowane programy językowe służące za¬ 
równo do ćwiczenia pisowni jak tez gramatyki czy skła¬ 
dni Wszystko to wraz z alfabetem właściwym dla da¬ 
nego języka zamienia C-64 w bardzo pomocne i przy¬ 
datne w szkole urządzenia Stwarza to także olbrzymie 
możliwości do przygotowywania materiałów szkolnych 
pisanych chocby i po hebrajsku czy pismem klino¬ 
wym 

GRAFIKA WYSOKIEJ 
ROZDZIELCZOŚCI (HIRES) 

Coś dla amatorów grafiki komputerowej ale również 
dla nauczycieli przedmiotów ścisłych WARSAW BA¬ 
SIC umożliwia przenoszenie do wybranego obszaru 
pamięci danego obrazu, jego zapis i wczytanie z dys¬ 
kietki czy kasety, przesłanie na drukarkę, tworzenie 
obrazow dwu i trójwymiarowych (<), mieszanie tekstu i 
grafiki na ekranie 

Trzy omowione wyżej możliwości tego interpretera 
kwalifikują go do grona najlepszych i stwarzają wszyst¬ 
kim posiadaczom Commodore 64 zupełnie nowe hory¬ 
zonty Nie koniec na tym, autorzy pomyśleli rowmez o 
innych wadach oryginalnego interpretera i wprowadzili 
kolejne ulepszenia 

Edytor wzbogacony został o bardzo przydatne nowe 
rozkazy i instrukcje takie jak AUTO RENUM DEL, 
FIND, MERGE, co znacznie ułatwi pracę podczas wpi¬ 
sywania czy edycji programu 

Matematycy otrzymali do dyspozycji osiem nowych 
funkcji (EVAL, EXAM FRAC, HEEK, MAK, MIN, ODD, 
ROUND) oraz możliwości programowania strukturalne¬ 


go (WBIF, WBELSE WBEND, WHILE DO, REPE- 
AT. UNTIL). Warsaw Basic dysponuje także „ proceso¬ 
rem tekstu w pigułce” (CMD*) oraz prostymi rozkaza¬ 
mi i funkcjami umożliwiającymi zarządzanie zbiorami 
typu REL (zbiory o dostępie bezpośrednim) w znacz¬ 
nie bardziej przystępny sposob — służą do tego instru¬ 
kcje CREATE, PRINT*, INPUT*, CLOSE*, OPEN* 
Uciążliwe w użyciu komendy współpracy ze stacją dys¬ 
ków zostały zastąpione odpowiednimi symbolami (po¬ 
dobnie jak w DOS WEDGE (DOS 5 1) co znakomicie tą 
współpracę upraszcza Wprowadzona została rozsze¬ 
rzona wersja instrukcji TRACĘ (może ona wskazywać 
zarowno poszczególne linie wykonywanie aktualnie 
przez komputer jak tez i za pomocą kursora wskazy¬ 
wać poszczególne rozkazy w tej linii które są w danej 
chwili wykonywane). Pułapki bez wyjścia czyli napotka¬ 
ne błędy pozwala nam wyłapać bez przerywania pro¬ 
gramu zaimplementowane także w WARSAW BASIC 
ON ERROR GOTO oraz RESUME 

O innych cechach WARSAW BASIC a można się 
przekonać samemu studiując uważnie listę dodatko¬ 
wych funkcji, instrukcji i rozkazów, którą zamieszczam 
poniżej Dodam jeszcze, ze WARSAW BASIC akcep¬ 
tuje wszystkie programy napisane dla Commodore 64 
w wersji BASIC 2 0 

AKIS — służy do deklarowania parametrów rzutu z 
przestrzeni trójwymiarowej na płaszczyznę 
ekranu (wysokiej rozdzielczości) 

AUTO — umożliwia automatyczną numerację linii 
podczas wpisywania programu 
BEEP — wywołuje sygnał dźwiękowy o regulowanej 
głośności, wysokości i czasie 
CALL — pozwala na wywołanie i wczytanie do pa¬ 
mięci podprogramu o podanej nazwie 
CHAIN — umożliwia wczytanie programu z pamięci 
zewnętrznej i jego wykonanie, w progra¬ 
mie tym można wykorzystywać zmienne 
deklarowane w programie wykonywanym 
uprzednio (me zostają one automatycznie 
skasowane jak w wypadku LOAD) 

CLOSE* — zamyka dostęp do otwartego zbioru rela¬ 
tywnego (REL) 

CMD* — jest to odpowiednik HARDCOPY umożli¬ 
wiającej przeniesienie zawartości ekranu na 
drukarkę z tym, ze w wypadku WARSAW 
BASIC możliwe jest podanie takich para¬ 
metrów jak lewy margines, liczba wierszy li¬ 
czba znaków w wierszu itp. 

CMD PRINT — CMD polega tu na wciśnięciu firmo¬ 
wego klawisza Commodore oznaczonego jako 
Commodore LOGO Key Wciskając np ten kla¬ 
wisz i literę A otrzymamy literę „ą" itd 
COLOUR — umożliwia zmianę kolorow ramki tła i 
tekstu 

COMMON — pozwala na utworzenie wspólnego blo¬ 
ku, do ktorego przepisywane są wszys- 
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tkie uprzednio zadeklarowane tablice i 

zmienne COMMON OFF likwiduje taki 
blok Dopuszczalne jest kilkakrotne 
stosowanie COMMON w danym pro¬ 
gramie 

CREATE — umożliwia utworzenie na dyskietce zbio¬ 
ru danych typu re atywnego (REL) o do¬ 
stępie bezpośrednim 

DEF USR — deklaruje adres początkowy funkcji za¬ 
pisanej w języku wewnętrznym 

DEF EXTERN — deklaruje adres początkowy proce¬ 
dury zapisanej w języku wewnę¬ 
trznym 

DEL — umożliwia kasowanie pojedynczych linii jak 
też całych fragmentów programu 

DISPOSE — umożliwia skasowanie informacji zawar¬ 
tej na stosie mikroprocesora o ostatnio 
otwartej pętli FOR . NEXT (DISPOSE 
NEXT), podprogramie (DISPOSE RE¬ 
TURN) lub ustawia wskaźnik stosu na 
stan jak zaraz po inicjaci (DISPOSE 
CLR) 

DOT — umożliwia włączenie (DOT) bądź wyłączenie 
(DOT OFF) danego punktu na ekranie wyso¬ 
kiej rozdzielczości (HIRES) 

DOS — daje użytkownikowi możliwość współpracy 
ze stacją dysków za pomocą poleceń sym¬ 
bolicznych np zamiast LOAD „PRO¬ 
GRAM ,8 i RUN możliwe jest użycie formy 
f PROGRAM 

DRAW umożliwia tworzenie grafiki wysokiej roz¬ 
dzielczości rysowanie linii 

EVAL — pozwala na zamianę wyrażenia tekstowego 
na wyrażenie arytmetyczne, innymi słowy 
możliwe jest (w dużym uproszczeniu) wpi¬ 
sywanie żądanych funkcji np poprzez IN- 
PUT 

FIND — pozwala na wyszukanie określonego ciągu 
tekstu czy stałych numerycznych i wyświet¬ 
lenie na ekranie numerów linii gdzie się one 
znajdują 

FRAC (X) — przyjmuje wartość równą części ułam¬ 
kowej wyrażenia, które jest jej argu¬ 
mentem 

GOTO — umożliwia skok do początku linii w którym 
znajduje się ten rozkaz Zamiast pisać 20 
PRINT A GOTO 20 wystarczy wpisać 20 
PRINT A GOTO 

HEEK (X) — pełni tę samą funkcję co PEEK, czyli 
podaje zawartość danej komork pamię¬ 
ci Różnica polega na tym, ze tam gdzie 
PEEK podaje zawartość ROM HEEK 
poda nam zawartość RAM lezącej 
„pod” ROM 

HICOLOUR — określa kolor ramki, tła i tekstu na 
ekranie wysokiej rozdzielczości 

HILOAD — pozwala na wczytanie do pamięci zapisa¬ 
nego uprzednio obrazu wysokiej rozdziel¬ 
czości 

MIMEM — określa obszar pamięci w którym będzie¬ 
my tworzyć obraz wysokiej rozdzielczości, 

HIPRINT — umożliwia mieszanie na ekranie wysokiej 
rozdzielczości grafiki oraz tekstu 

HIRES — pozwala na wyświetlenie obrazu wysokiej 
rozdzielczości na ekranie monitora czy od¬ 
biornika telewizyjnego 

HISAVE — umożliwia zapisań e na dysku/kasecie 
obrazu wysokiej rozdzielczości 

IF THEN ELSE — pełni tą samą funkcję co zwykłe IF 


THEN z tym, ze dodano tu instru¬ 
kcję ELSE oznaczającą „w prze¬ 
ciwnym wypadku wykonaj...” 

INPUT* — pozwala na wczytanie danego rekordu ze 
zbioru typu relatywnego REL (o dostępie 
bezpośrednim) 

KILL — umożliwia powrot do standardowego inter¬ 
pretera Commodore 64 

LINĘ — rysuje Imię na ekranie wysokiej rozdziel¬ 
czości 

LIST — w standardowym interpreterze, wykonanie 
LIST powoduje zawsze powrot do trybu pracy 
ekranowego (działanie programu w którym 
LIST wystąpiła zostaje przerwane) Wada ta 
została usunięta i LIST może byc używany w 
programie, me powodując jednocześnie 
wspomnianego wyżej powrotu do trybu ekra 
nowego. 

LIST — podobnie jak w wypadku GOTO, powoduje 
wyświetlenie na ekranie linii w którym LIST. 
występuje 

MAX — przyjmuje wartość równą największej wartoś¬ 
ci sposrod wyrażeń będących argumentami 
tej funkcji 

MERGE — pozwala na dołączenie do programu znaj 
dującego się w pamięci komputera dru¬ 
giego programu zapisanego na dysku czy 
taśmie 

MERGE PROC — umożliwia tworzenie zestawów 
(pakietów) procedur 

MEM — wyświetla na ekranie informację o aktualnej 
konfiguracji pamięci, liczbę bajtów zajętych 
przez tekst programu, poszczególne typy 
zmiennych, tablice itp 

MIN — tak jak MAX — tyle, ze przypisywana jest war¬ 
tość najmniejsza 

MOVE — umożliw a przeniesienie wybranych obsza¬ 
rów pamięci w inne jej miejsce dotyczy to 
także grafiki wysokiej rozdzielczości 

NEW — oprocz zwykłej swojej funkcji kasuje również 
wspólny blok zmiennych NEW PROC urno- 
zliwia także kasowanie wczytanych do pa 
mięci podprogramów 

ODD — przyjmuje wartość — 1 gdy wyrażenie ma 
wartość nieparzystą 

ON ERROR GOTO — umożliwia obsługę błędu, któ¬ 
ry wystąpił bez przerywania wykonywania 
programu 

OPEN* — otwiera dostęp do zbioru relatywnego typu 
REL (o dostępie bezpośrednim) 

PRINT@ — odpowiednik PRINT AT czyli pozwala na 
wyświetlenie danego tekstu w ściśle 
określonym miejscu ekranu 

PRINT USING — umożliwia formatowanie zapisu np 
cyfr w pewnej z góry ustalonej for¬ 
mie na ekranie 

PRINT* — pozwala na zapisanie rekordu do zbioru o 
dostępie bezpośrednim (REL) 

PROCEDURĘ — określa procedurę zdefiniowaną 
przez użytkownika Procedura taka 
musi się konczyc PROC END 

PROC — umożliwia nakładkowanie, redagowane i 
testowanie procedur zdefiniowanych uprze¬ 
dnio przez użytkownika 

REM — instrukcja REM może byc zastąp ona w 
WARSAW BASIC za pomocą apostrofu 

RENUM — umożliwia przenumerowan e linii progra¬ 
mu w żądanej przez użytkownika formie 
Przenumerywowamu poddawane są także 


numery linii występujące po GOSUB 
GOTO, RUN itp 

RESTORE — pozwala na ponowne odczytanie da 
nych zawartych w DATA wraz ze ści¬ 
słym określeniem miejsca skąd odczy¬ 
tywanie to będzie wykonywane 
RESUME — występuje jako zakończenie procedury 
obsługi błędu i pozwala na określenie li¬ 
nii od której ma zostać wznowione wy¬ 
konywanie programu 

REVERS — umożliwia utworzenie negatywu danego 
obrazu wysokiej rozdzielczości 
ROUND — umożliwia zaokrąglenie danej liczby do li¬ 
czby znaków określonych jednym z para¬ 
metrów tej funkcji 

RUN — pozwala na uruchomienie danej procedury 
(RUN PROC), uruchomienie programu od 
ostatnio wykonywanej linii lub linii gdzie 
RUN. się znajduje 

SDOT — umożliwia odzwierciedlenie na płaszczyź¬ 
nie ekranu (w trybie wysokiej rozdzielczoś¬ 
ci) punktu który jest rzutem z przestrzeni 
trójwymiarowej 

SDRAW — tak samo jak DRAW z tym że odnosi się 
do przestrzeni trójwymiarowej 
SEC — umożliwia zatrzymanie programu (pauza) na 
określoną liczbę sekund 

SLEEP — wyłącza ekran przyspieszając w ten spo¬ 
sób wykonywanie programów o ok 8%, 
zmieniany jest tez system przerwań 
SLINE — tak samo jak LINĘ z tym, ze odnosi się do 
przestrzeni trójwymiarowej 

SWAP — pozwala na zamianę między sobą dwóch 
obszarów pamięci 

SYS — za pomocą określonych w instrukcji obsługi 
adresów można m in. włączac i wyłączać 
przyspieszanie wczytywania programów z 
dysku, oraz micjalizację klawiszy funkcyjnych 
(klawiszom tym przypisano 12 rożnych funk- 
Cji) 

TRACĘ — siedzenie wykonywanego programu. 

WBIF — umożliwiają nam programowanie struktural- 

WBELSE ne 

WBEND 

Możliwości oferowanych nam przez WARSAW BA¬ 
SIC jest oczywiście znacznie więcej niestety ramy p s- 
ma me pozwalają na ich dokładne przedstawienie 
Program ten powstawał i doskonalił się przez trzy 
lata Trzy lata ciężkiej pracy dwóch zapaleńców, którzy 
postanowili udowodnić na przekor wszystkim, ze po¬ 
gardliwie traktowane przez „dorosłych” informatyków 
mikrokomputery mogą także przydać się niejednemu 
— wystarczy jedynie chciec i umieć ułożyć do nich od¬ 
powiedni język 

WARSAW BASIC istnieje na razie tylko w wersji dla 
komputerów Commodore 64 i 128 Nic jednak me stoi 
na przeszkodzie, by powstały wersje dla innych kom¬ 
puterów Z pewnością warto, bo jest to jeśli me najlep¬ 
szy, to jeden z najlepszych języków, którymi dysponu¬ 
ją komputery domowe i półprofesjonalne Marzeniem 
autorow jest zainstalowanie WARSAW BASIC a w 
komputerach szkolnych Wszyscy w naszej redakcji 
zgodni są co do tego, ze byłoby to znakomite rozwią¬ 
zanie 


Klaudiusz Dybowski 


POWIĘKSZENIE PAMIĘCI DLA COMMODORE 16 


W roku 1984 firma Commodore przed ■ 
stawiła trzy nowe modele mikrokompute ¬ 
rów C-16, C 116 oraz Commodore 
PLUS 4 Modele te są poza niewielkimi 
różnicami (klawiatura, pamięć RAM, obu¬ 
dowa) identyczne Mimo, ze oferują zna¬ 
cznie lepszą wersję języka BASIC 
(V3 5), to pozostają jednak w cieniu 
Commodore 64 Jest to spowodowane 
m in małą ilością oprogramowania oraz (w 
wypadku C 16 i C-llo) mew elką pojem 
noscią pamięci RAM Tę ostatnią wadę 
usunąć można poprzez dołączenie od 
dzielnego modułu albo — jak proponuje- 
my wam w tym artykule — dokonując nie¬ 
wielkich przeróbek wewnątrz komputera 
Pamięć RAM w C-16 to dwa układy 
pamięci dynamicznej o pojemności 16K 
x 4 bit (układy U5 i U6 jak na rys 1) Do 
adresowania pamięci 16KB komputer 
wymaga tylko 14 linii adresowych (do 
Al 3). Układy pamięci są połączone z 
szyną adresową poprzez dwa multiplek 
sery (układy U7 i U8) Dwie pozostałe Ii- 
me adresowe (Al 4 i Al 5) me są podłą 
czone do szyny adresowej, ale do + 5V 
aby miały określony stan (w tym przy 
pad ku wysoki) 


Zwększeme pamięci RAM uzyskuje 
ssę poprzez zastosowanie większych 
układów pamięci (64K x 4 bit), odłącze¬ 
nie obu me wykorzystanych linii adreso ¬ 
wych i połączenie ich poprzez układ Ul6 
(zarządzający adresami) z szyną adreso¬ 
wą Jako układy pamięci można zastoso¬ 
wać układy FUJITSU MB 81464 15 
TMS 4464-15N2, TMN 41464P-12 czy 
tez ich odpowiedniki 
Po wylutowamu układów U5 i U6 war¬ 
to przedtem zajrzeć do „Bajtka” nr 2/86) 
wlutowujemy w te miejsca podstaw¬ 
ki i osadzamy w nich nowe układy Następ¬ 
nie należy odłączyć obie linie adresowe 
od zasilania + 5V; w tym celu należy 
przeciąć skalpelem lub żyletką cienką 
ścieżkę poprowadzoną poa układem U7, 
łącząc nozki 2 i 16 Mozę to pociągnąć 
za sobą konieczność wylutowama ukła¬ 
du W takim przypadku radzimy rowmez 
wstawić w to miejsce podstawkę W przy¬ 
padku multipleksera U8 sprawa jest o wie¬ 
le orostsza — należy tylko przeć ąc po 
stronie druku połączenie nozki 14 z szero 
ką ścieżką zasilania +5V 
Po przerwaniu połączeń należy dołą¬ 
czyć wolne linie adresowe do szyny ad¬ 


resowe W tym celu należy za pomocą 
cienkicn, izolowanych przewodów połą¬ 
czyć nozkę 2 układu U8 z nozką 7 ukła 
du Ul6 (linia Al5) oraz nozkę 14 układu 
U8 z nozką 26 układu Ul6 (lima Al4) Po 
zmontowaniu całości i włączeniu zasila 
ma otrzymujemy na ekranie napis 

COMMODORE BASIC V3.5 60678 
BYTES FREE 

W C 16 nie ma problemu z zarządza 
mem w ększą ilością pam ęci poza jed¬ 
nym wyjątkiem w trybie graficznym pa 
mięć BASIC znajduje się w innym ob¬ 
szarze niż w trybie tekstowym, co przy 
dłuższych programach graficznych może 
doprowadzić do pewnych komplikacji 
Z tego powodu radzimy przełączać kom¬ 
puter w tryb graficzny bezpośrednio po 
włączeniu i powracać do trybu tekstowe¬ 
go rozkazem GRAPHIC 0 zamiast 
GRAPHIC CLR 

Witold Misztal 
Sławomir Waszczuk 



































Zapewne me jeden z Was próbował przy pomocy 
zwykłego kabla do nagrywania połączyć poprzez 
gniazda do magnetofonu dwa mikrokomputery Me¬ 
ritum, w celu przegrania programu z jednego mi¬ 
krokomputera na drugi. 

Stosowanie zarówno kabla monofonicznego jak i 
stereofonicznego me dawało pożądanych efektów, 
dlaczego 9 Otóż okazuje się, że gniazdo magneto¬ 
fonowe w naszym mikrokomputerze podłączone 
jest w następujący sposób na styku nr 1 podłączo¬ 
ne wyjście, na styku nr 2 podłączona jest masa, a 
na styku nr 3 podłączone jest wejście Łącząc teraz 
poprzez zwykły kabel nagrywający otrzymywaliśmy 
zawsze połączenie wejście-wejście, masa-masa, 
oraz wyjście-wyjście. Aby jednak można było prze¬ 
grywać programy „komputer-komputer” należało¬ 
by doprowadzić do tego aby wejście było połączo¬ 
ne z wyjściem i odwrotnie, wyjście było połączone 
z wejściem, a masy razem 

Niektórzy z Was przelutowaliby zapewne zwykły 
kabel nagrywający zmieniając tylko przewody miej¬ 
scami, można i tak, ale wtedy potrzebne są dwa ka¬ 
ble, jeden do nagrywania z magnetofonu, drugi do 
przegrywania programów „komputer-komputer”, 
przy czym należy jeszcze pamiętać, który kabel do 
czego będzie służył Proponuję Wam zbudowanie 
prostego złącza, które pozwoli na wykorzystanie je¬ 
dnego kabla nagrywającego. Do naszego „SUPER- 
-WTYKU” potrzebna jest jedna wtyczka diodowa i 
jedno gniazdko diodowe. Gniazdko i wtyczkę łą¬ 
czymy w następujący sposob styk nr 1 łączymy ze 
stykiem nr 3, styk nr 3 łączymy ze stykiem nr 1, 
styki nr 2 łączymy razem 

Teraz tylko zostaje nam wypróbowanie „SUPER- 
-WTYKU”, proponuję Wam program, który pozwoli 
na samoczynne wgranie się programu w przypadku 
pojawienia się sygnału w gniazdku magnetofono¬ 
wym w mikrokomputerze. 

10 A=INP(255) 

20 IF A<»INP(255) THEN CLOAD 

30 GOTO 20 

Po uruchomieniu powyższego programu teraz 
już wystarczy tylko wysłać zlecenie CSAVE „naz¬ 
wa” na drugim mikrokomputerze, aby na pierw¬ 
szym mikrokomputerze program zaczął się wczyty¬ 
wać bez obawy że me zdązymy w odpowiednim 
momencie wcisnąc ENTER. Program ten można 
tez wykorzystać przy wczytywaniu programów z 
magnetofonu 

Bogdan A. Grzybowski 
INFORMIK 


WTYK GNIAZDO 




KLAN AMSTRAD-SCHNEIDER 


| Co piszczy pod klawiaturą ?) 




TABELA 

ADRESÓW 

PROCEDUR 

SYSTEMOWYCH 

C.D. 


Nr 

Adres 

Adres rzeczywisty/opss 


wektora 

464 

664 

6128 

94 

BC1A 

0B64 

0B66 

0B6A 


95 


96 


97 


98 


99 


100 


101 


BC1D 


BC20 


BC23 


BC26 


BC29 


BC2C 


BC2F 


Oblicza adres rzeczyw sty znaku na ekra¬ 
nie (kolumna, lima) 

Wej H zawiera numer kolumny, a L numer 
linii 

Wyj HL zawiera adres rzeczywisty pamię¬ 
ci ekranu, B zawiera informację o ilo¬ 
ści bitów na piksel w aktualnym trybie 
ekranu, AF są modyf kowane 

0BA9 0BAB 0BAF 

Oblicza adres rzeczyw sty punktu na ekra¬ 
nie 

Wej DE zaw era współrzędną X punktu a 
HL współrzędną Y punktu licząc w 
stosunku do lewego dolnego rogu 
ekranu 

Wyj HL zawiera adres rzeczyw sty punktu 
(p ksela) w pamięci, B ilosc bitow/p k- 
sel zmniejszoną o jeden, C zawiera 
maskę punktu AF i DE są modyfiko¬ 
wane 

0BF9 0C01 0C05 

Oblicza adres rzeczywisty dla bajta w prawo 
od adresu rzeczywistego bieżącego 
Wej HL zawiera adres bieżący. 

Wyj HL zawiera nowy adres a AF są mo¬ 
dyfikowane 

0C05 0C0D 0C11 

Podobnie jak dla BC20, lecz dla bajta w le 
wo 

0C13 0C1B 0C1F 

Podobn e jak dla BC20 lecz dla odpowie¬ 
dniego bajta w mzszej linii. 

0C2D 0C35 0C39 

Podobnie jak dla BC20, lecz dla odpowie¬ 
dniego bajta w wyzszej linii 

0C86 0C8A 0C8E 

Maskuje numer atramentu w taki sposob, 
aby po dostarczeniu bajta reprezentujące¬ 
go punkty nastąpiło wysw etleme punktów 
we właściwym kolorze 
Wej A zaw era numer atramentu 
Wyj A zaw era maskę a F jest modyfiko¬ 
wany 

0CA0 0CA3 0CA7 

Wykonu je proces odwrotny w stosunku do 
poprzedn ego (BC2C). 

Wej A zaw era maskę 


(cz. 8) 


102 


103 


104 


105 


106 


107 


108 


109 


110 


BC32 


BC35 


BC38 


BC3B 


BC3E 


BC41 


BC44 


BC47 


BC4A 


Wyj: A zawiera numer atramentu a F jest 
modyfikowany 

OCEC OCEE 0CF2 

Ustala kolory atramentu 
Wej A zawiera numer atramentu, B zawie¬ 
ra pierwszy kolor a C drugi kolor 
Wyj AF, BC, DE i HL są modyfikowane 

0D14 0D16 ODIA 

Odczytuje kolory atramentu 
Wej A zawiera numer atramentu 
Wyj B zawiera pierwszy kolor a C drugi 
kolor AF, DE i HL są modyfikowane 

0CF1 0CF3 0CF7 

Ustala kolory wyświetlania ramki (BORDER) 
Wej B zawiera pierwszy kolor, C zawiera 
drugi kolor 

Wyj AF, BC, DE i HL są modyfikowane 
0D19 0D1B 0D1F 

Odczytuje kolory ramki (BORDER) 

Wej me ma 

Wyj B zawiera p erwszy kolor, C zawiera 
drugi kolor AF, DE i HL są modyfiko¬ 
wane 

0CE4 0CE6 0CEA 

Ustala czasy migania kolorow ramki. 

Wej H zawiera czas wyświetlania pierw ¬ 
szego a L drugiego koloru 
Wyj AF i HL są modyfikowane 

0CE8 0CEA OCEE 

Odczytuje czasy migania kolorów ramki 
Wej me ma 

Wyj H zawiera czas wyświetlania pierw¬ 
szego a L drugiego koloru AF są mo 
dyfi kowane 

0DB3 0DB5 0DB9 

Wypełnianie prostokąta atramentem 
Wej A zawiera maskę odpowiadającą atra¬ 
mentowi, H numer kolumny lewej, D 
numer kolumny prawej, L numer gór¬ 
nej linii a E numer dolnej linii 
Wyj AF, BC, DE i HL są modyfikowane 
0DB7 0DB9 0DBD 

Ustala ilosc bajtów w pamięci ekranu dla 
wypełniającego prostokąt atramentu 
Wej A zawiera maskę odpowiadającą atra¬ 
mentowi, HL zawiera adres odpowia¬ 
dający lewemu górnemu rogowi pro¬ 
stokąta, D zawiera ilosc bajtów, E ilosc 
inn 

Wyj AF, BC, DE i HL są modyfikowane 
0DDF 0DE1 0DE5 

Zamiana dwóch kolorow znaku 
Wej B zawiera maskę jednego koloru, C 
zawiera maskę drugiego koloru, H 
zawiera numer kolumny a L numer 
linii. 

Wyj AF BC, DE HL są modyfikowane. 


Wojciech Ziółek 





































DANDARE 

(PILOT OF THE FUTURĘ) 

Dan Dare to barwna i popularna postać z an¬ 
gielskich komiksów typu SF. Dan to rodzaj bohate¬ 
ra gotowego oddać życie za powodzenie swojej 
misji. Przedstawiane w programie przygody Dana 
są związane z pojawieniem się gróźb ze strony Me- 
kona. Mekon to typowy czarny charakter choc jego 
skora miała kolor raczej zielony. 

Mekon zmienił kurs jednego z asteroidów krążą¬ 
cych wokół Plutona na kolizyjny z Ziemią. Na aste- 
roidzie założył swoją bazę i stamtąd wysyła żąda¬ 
nia wobec Ziemian. Na zasadzie szantażu próbuje 
wymusić na Ziemianach objęcie przez siebie pro¬ 
tektoratu nad Ziemią. 

Ziemianie mają tylko dwa wyjścia z tej sytuacji: 

— zgodzić się na żądania Mekona i oddać się w 
niewolę 

— czekać na rozwoj wypadków i mieć cień nadziei 
na ratunek. 

W niecnych poczynaniach, Mekonowi pomaga 
jego gwardia przyboczna złożona z doborowych 
oddziałów Treens’ow. 

Rząd Światowy podjął jednak decyzję o wysła¬ 
niu specjalnej misji do wysadzenia całego asteroi- 
du wraz z bazą Mekona. 

W skład załogi „Anastazji” („Anastazja” — sta¬ 
tek typu „SCOUT” o napędzie fotonowym) weszły 
dwie osoby Digby i Dan Dare. Przy czym Dan ma 
za zadanie uruchomić system samozniszczenia 
asteroidu a Digby przygotowuje ucieczkę z zagro¬ 
żonej strefy. 

Na wyposażeniu Dan ma wysokoenergetyczny 
pistolet laserowy i profilaktyczną osłonę siłową o 
niewielkiej mocy. Broń i osłonę w trakcie misji mo¬ 
żna doładować. 

Cel gry: 

Po przylocie „Anastazją” na asteroid trzeba 
zejsc do podziemi bazy. Baza ma pięć poziomow i 
na każdym jest częsc mechanizmu autodestrukto- 
ra. Każdego poziomu bronią „Treens’i a ponadto 
roboty, „strzelające miny”, zapadnie i inne niespo¬ 
dzianki. Każda częsc autodestruktora wygląda jak 
mała beczka a zabierzesz ją gdy wskoczysz na nią. 

Wszystkie części autodestruktora trzeba przy¬ 
nosić do Centrum Kontroli asteroidu (pomieszcze¬ 
nie łatwo odnaleźć — „pięć kołek na dwóch słu¬ 
pach”). Każde przyniesienie części powoduje pra¬ 
cę części systemu. 

Trzeba też dodać, że na odnalezienie i skomple¬ 
towanie systemu autodestruktora masz niecałe 
dwie godziny czasu symulacji. 

Każdorazowe odniesienie części powoduje też 
otworzenie drzwi następnego poziomu. 

Windy (stawaj „w cieniu” i wciskaj klawisz zgod¬ 
ny z kierunkami strzałek) poruszają się w kierun¬ 
kach wskazywanych przez strzałki. 

Używaj broni bardzo oszczędnie gdyż ma ogra¬ 
niczoną moc. 

„Minę” można zniszczyć, wskakując na nią. 
Uważaj na strzelające z sufitu lasery. 

Gdy zabraknie ci energii idziesz odsiedzieć 10 
min. za kratki po czym uciekasz i znów jestes wol¬ 
ny. 

Gdy uciekasz z „więzienia” nie obawiaj się niko¬ 
go i niczego gdyż bez względu na twoje poczyna¬ 
nia energia przez pewien czas nie maleje. 

„Powodzenia — powiedział przed odlotem pre¬ 
zydent Ziemi — losy ludzkości w twoich rękach 
Dan. Wierzymy w Ciebie, nie zawiedź nas. — Po¬ 
tem „Anastazja” przetransportowała nas na aste- 
roid. Już nie ma odwrotu”. 

(M.l) 

Firma — VIRGIN GAHEG 

Autor — The Gang of Five 

Komputer — ZX Spectrum 48/+/128/ + 2/ + 3 
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Ostatnio dostałem wiele lisiow od nowych czytelników 
Bajtka z prośbą o przypomnienie zasad głosowania na li¬ 
stę Przypominam, każdy głosujący nadsyła własną jego 
zdaniem najlepszą dziesiątkę gier na dowolny mikrokom¬ 
puter 

Wszystkie propozycje zostają zsumowane i tworzą „złotą 
10 ł Główną nagrodę otrzymuje osoba której propozycja 
jest zgodna z listą zamieszczoną w Bajtku (jak dotąd nikt 
me trafił) Niezależnie zawsze spośrod nadesłanych pro¬ 
pozycji wybieramy Bajtkowego Króla i Krolową Gier 
(Specjalna premia za opisy typowanych gier) Na siódme 
notowanie nap>łynęło 4 320 propozycji, głosowano na 153 
tytuły gier 
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Nagrody — zestawy programów komputerowych — 
ufundowane przez firmę Electronics Export z Londynu 
otrzymują Piotr Banaszewski z Łodzi oraz Radosław Zys- 
kowsk, również z Łodzi SldWek 




TAU CETI reprezentuje nowy typ gier 

komputerowych, w których nastąpiło połączenie 
wielu rodzajów gier tj gier zręcznościowych (AR- 
CADE), gier strategicznych (STRATEGIC) i gier sy¬ 
mulacyjnych (SIMULATIONS) Połączenie to w 
efekcie dało grę, w którą może grać każdy Inne 
tego typu gry to ELITE (firmy Firebird), ACADEMY 
(firmy CRL) czyli druga częśc TAU CETI. 

Jaki jest cel gry i jak w mą grac 7 
Nowoczesnym, małym kosmicznym pojazdem 
musisz wylądować na wielkiej planecie robotów 
Gdy wylądujesz, ruszy za tobą pościg więc musisz 
go zgubie lub zniszczyć (co w gruncie rzeczy jest o 
wiele prostsze) Gdy pozbędziesz się towarzystwa 
zacznij wykonywać zadaną misję Główną częścią 
twojej misji jest odnalezienie 40 połówek prętów 
paliwowych do reaktora, Z dwóch pasujących do 
siebie połowek mozesz (odpowiednio dopasowu¬ 
jąc, zmieniając kolory) złozyc cały pręt Wszystkie 
te czynności wykonujesz na ekranie za pomocą 
opcji TODS. Po skompletowaniu całego materiału 
paliwowego mozesz (wsuwając odpowiednie pręty 
na ich miejsca) uruchomić reaktor To cała misja 
Prawda że proste 7 

Cały świat na zewnątrz możesz obserwować i 
odpowiednio interpretować pod warunkiem, ze 
perfekcyjnie poznasz wszystkie możliwości swoje¬ 
go pokładowego komputera. 

Rozejrzyj się trochę po swojej tablicy rozdziel¬ 
czej (masz ją na ekranie) Widzisz sporo różnych 
wskaźników Dzięki nim będziesz mógł skutecznie 
kontrolować komputer a co za tym idzie i pojazd 
Oto tablica i znaczenie wskaźników 
HEIGHT — wskaźnik wysokości (w stopach 
„foot”) 

SHIELD — „tarcza" czyli pole ochronne pojazdu 
FUEL — wskaźnik paliwa (w galonach) 

LASER — laser, twoja broń 
SPEED — szybkościomierz (w milach na godzi¬ 
nę) 

Efektywna zdolność lasera jest ograniczona co 
widać na wskaźniku „FL” (me używaj go zbyt dłu¬ 
go, łatwo jest go przegrzać) 

Masz tez w polu widzenia wskaźnik podczerwie¬ 


ni (Noktowizor) Gdy masz włączone reflektory 
podczerwone twoja widoczność ulegnie poprawie 
U góry ekranu widzisz kompas ze swoim aktual¬ 
nym kierunkiem ruchu, dalej zegar z aktualnym 
czasem gry (do skończenia jej potrzeba co naj¬ 
mniej 6 godzin zegarowych) Masz do spenetrowa¬ 
nia 30 miast, a to w którym aktualnie jesteś, masz 
napisane na ekranie. Widzisz także informacje o 
aktualnym stanie twojego pojazdu (STATUS) 

W lewym, dolnym rogu ekranu masz mały termi¬ 
nal do porozumiewania się ze swoim pokładowym 
komputerem Możesz wydawać mu pewne rozka¬ 
zy- 

HELP — pomoc, przypomnienie rozkazów 
SIGHTS ON — włącz reflektory podczerwone 
SIGHTS OFF — wyłącz reflektory podczerwone 
LOOK — przegląd aktualnej sytuacji 
LAUNCH — załadowanie katapulty 
Można zadawać pytania 
MAP — mapa, widok terenu 
EQUIP — sprzęt, wykaz sprzętu, który posia¬ 
dasz 

STATUS — aktualny stan twego pojazdu 
Możesz dzięki komputerowi wykonywać pewne 
operacje- 

REACTOR — reaktor 
RODS — elementy reaktora 
Przydatne wskazówki do gry: 

— mogą zaatakować cię wrogowie, niszcz ich la¬ 
serem lub MISSIL em 

— po opuszczeniu miasta wrogowie pojawią się z 
powrotem 

— me strzelaj w „drzwi”, gdyż me wpuszczą cię 
do środka 

— paliwo mozesz tankować w centrach wojsko¬ 
wych lub cywilnych 

— w centrach mozesz znaleźć tez inne przydatne 
przedmioty 

(M.l) 

Firma — CRL 

Autor — PETE COOKE 

Komputer— ZX Spectrum 48k(+)128(+2)+3. 

Commodore 64/128, Amstrad / 
Schneider 464/6128 
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CO JEST GRANE 



CRITICAL MASS 


...„Widząc wrogi ornitopter, Paul 

Atryda mocniej zacisnęi dłonie na sterach Chwila sku¬ 
pienia, strzał i wrogi pojazd rozbił się o skały pustynnej 
planety Arrakis To znowu sardaukarzy w służbie Mar¬ 
ko nneno w — pomyślał Paul Baron Vladimir Harkon- 
nen bardzo łatwo pozbył się swych doskonałych od¬ 
działów Z zamyślenia wyrwał Paula nagły wstrzęs orm- 
toptera Pojazd rozbił się o szczątki przetwórni przypra¬ 
wowej Chroniąca Paula tarcza uratowała go przed 
śmiercią Jedynym wyjściem był powrot do filtranam o- 
tu po drugi ornitopter Młody Atryda wiedział, ze znaj¬ 
duje się na terenach zajętych przez czerwie pustynne 
Te ogromne robaki (rdzenni mieszkańcy Arrakis nazy¬ 
wali je Stworzycielami) czyhają na każdy nieostrożny 
ruch człowieka aby go połknąć 
W oddali zamajaczył niewyraźny cten filtranamiotu 
Paul podbiegł do mego i w ostatniej chwili wdrapał się 
na gorę Zęby czerwia uderzyły w piasek 
Czy potrafisz doprowadzić ornitopter młodego wład¬ 
cy do końca piątej strefy otaczającej reaktor atomowy 
pozostawiony przez barona Harkonnena? Najpierw je¬ 
dnak sięgnij po książkę Franka Herberta . Diuna” 
Opowiada ona o skomplikowanym systemie rządzenia 
planetą Diuna, zwaną tez Arrakis O władzę walczą 


Atrydzi i Harkonnenowie Książę Leto Atryda w następ¬ 
stwie intryg barona został zamordowany Jego synowi i 
lady Jessice pomagają tubylcy — Fremeni. Powieść 
, Diuna na pewno zainteresuje każdego miłośnika SF 
Frank Herbert napisał dalsze cztery części losow pla¬ 
nety zatytułowane kolejno „Zbawiciel Diuny , „Dzieci 
Diuny”, „Bog — władca Diuny”, .Heretycy Diuny 
Seria ta należy do najwybitniejszych dzieł światowej li¬ 
teratury fantastycznej 

W grze Critical Mass trzeba przelecieć ormtopterem 
pięć stref ochronnych, dotrzeć do reaktora a następnie 
rozbić go Przeznaczone jest na to 10 minut, po upły¬ 
wie których planeta rozpadnie się na kawałki Zadanie 
utrudniają sterczące wszędzie skały, szczątki urządzeń 
do przetworu przyprawy — największego bogactwa 
Arrakis, a także latające wróg e obiekty Podczas gry na 
ekranie znalezc można informacje o energii, kierunku, 
w którym znajduje się wróg lub filtrnamiot, odległości 
od końca strefy i ilości zdobytych punktów Manewro¬ 
wanie ormtopterem me jest łatwe ze względu na jego 
dużą bezwładność Spróbuj jednak uratować Arrakis 

(mp) 

Firma: Durell Software 

Komputer: Commodore 64/128, Spectrum 48/+/128/+2/+3 


POKE 

ncysto- 


W nowym Pokerzyście oprócz POKE’ów znalazły się tez inne 
pomoce dla wytrwałych graczy I tak 
GHOSTBUSTERS — ACTMSION 
TANG BILLY 15570011 — kod na 93600 £ 

STARSTRIKE II — REALTIME SOFTWARE 
HEAK AND OBEY — wpisane po wciśnięciu pauzy a następnie 
klawisza 

O — odnowienie paliwa 
W — odbudowanie osłony 

E — regeneracsa lasera 

STEINLESS STEEL — MICRO GEN 

ALIK lub SILK — wpisane po wciśnięciu pauzy daje mesrmertel 
nosć i regeneracje osłony 

FRANK BRUNO s BOXING — ELITE 

kod do załadowania poszczególnych bokserów na smię STE' 

— Fling Long Chop — BS8N8NMAO 

— Andra Puchenderow — AMC1NAK9C 

— Tr bal Trouble — FQ6 N9SN9 

— Franch e — 1KAMBON3 

— Ravio!i Mafiosi — INDIIAOM6 

— Andy Antipodean — NR7IN9MI4 

— Peter Perfect—ILBIIOKNI 

A teraz zwykłe pomoce w postaci POKE ow 

LIGHT FORCE — FTL 

POKE 40725 0 

1942 —ELITE 

POKE 47007 255 

PAPER BOY — ELITE 

POKE 48023,201 

WAR — MARTĘCH 

POKE 38394 0 

ELITE — FSREBIRD 

POKE 46848,201 

CYBERUN —ULTIMATE 

POKE 36168 175 

DAN DARE—N/IRGIN 

POKE 36268 175 : POKE 45954 104 

SPINDIZZY — ELECTRIC DREAMS 

POKE 48272,201 POKE 48401.201 

FINDERS KEEPERS— MASTERTRONIC 

POKE 34252,0 lub 30394,X POKE 33969,0 X-il. ludzików 

Całe Loadery 

CAULDROŃ — PAŁACE SOFTWARE 
10 REM M 1 

20 CLEAR VAL .24599" FOR n=23296 TO 23309 READ a 
POKE na NEXT n 

30 LET L= USR VAL ..23296" POKE 40060 0 LET L= USR 
VAL „24600 

40 DATA 221 33 24 96 17 232 159,62 255 55 205 86 201 
PHOENIX — ALTERNATIVE SOFTWARE 

10 REM M.1... 

20 CLEAR VAL 24500 LOAD , „CODĘ 24532 
30 POKE 29375,0 LOAD CODĘ 
40 RANDOMIZE USR VAL . 30105" 

SWEEVO S WORLD — GARGOYLE GAMES 
10 REM M 1 

20 CLEAR VAL .24799” LOAD ,, SCREENS LOAD „„CODĘ 
LOAD .... CODĘ POKE 33219 0 
30 RANDOMIZE USR VAL „24800* 

CRITICAL MASS — DURELL SOFTWARE 

10 REM M.1... 

20 LOAD .. SCREENS : INK 6 OVER 1 PRINT AT 0 0 
30 LOAD CODĘ POKE 56879 52 
40 PRINT USR VAL 48000’ 

ZUB — MASTERTRONIC 
10 REM M 1 

20 BORDER NOT PI INK NOT PI PAPER NOT PI :OVER SGN PI 
30 CLEAR VAL „24699 

40 LOAD SCREENS LOAD .,„ CODĘ LOAD .... CODĘ 
50 POKE 37473 201 
60 RANDOMIZE USR VAL ,24700 

POKE i można wprowadzać bezpośrednio do loadera lub na pro 
gramie COPY-COPY Loadery i POKE i mogę me działać przy in¬ 
nych wersjach programów niż dostępne redakcji. 


GRACZ 


BAJTK0WI KRÓLOWIE GIER 


tfi Z ? T- 

o > ^ 

T3 .r- ł- 

(C O) c 

tt N 
■™ o o 

3 * 



Posiadany mikrokomputer: Alan 800XL z magnetofo¬ 
nem 

Ulubione gry: Boulder Dash, Spy Vs Spy II 
Zainteresowania: Chemia, Informatyka 

Wymarzony komputer: Atari 520 ST 

Plany na przyszłość: Napisać program edukacyjny z 

Chemii 
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Posiadany mikrokomputer: Spectrum 48 k 
Ulubione gry: Arnhem, Desert Rats 
Zainteresowania: Grafika komputerowa 
Wymarzony komputer: IBM 
Plany na przyszłość: dostać s ę na Informatykę 



Poszukuje dokładnego opisu gry , JEWELS OF BABILON w wer¬ 
sji na mikrokomputer Amstrad 6128 

Agnieszka Pyka 
ul. Polna 44 
44-227 Przyszowice 

Razem z kolegę gramy juz bardzo długo w grę „POP EYE” Nie¬ 
stety, dochodź my do pewnego momentu z którego nie ma już wyjś¬ 
cia. ponieważ brak est kluczyka Pomóżcie. 

Presjan Naczew 
ul. Wiśniowa 14/28 
31-426 Kraków 

Poszukuje nieśmiertelności i innych ułatwień w grach CAUL- 

DRON DYNAMITE DAN IMP MISION w wersji na C-64 

Marek Awramienko 
ul. Świerczewskiego 30 
44-120 Pyskowice 

Posiadam grę „TIME-GATE ale coz z tego, kiedy jest ona nagra 
na na kasecie firmowej bez programu ładujęcego 
Mozę ktoś z czytelników pomoże mi zdobyć ten program 

Oskar Lewiński 
ul. Szkolna 7/7 
14-530 Frombork 

Poszukujemy informacji na temat gier karate na mikrokomputery 
Atan 800XL i Spectrum 48 oraz planu gry . SABOTEUR” w wersji na 
ZX Spectrum 

Marek Suczyk Jarek Janas 

ul. Helska 5/8 ul. Helska 9/5 

44-100 Gliwice 44-100 Gliwice 
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ROZWIĄZYWANIE UKŁADU 3ÓWNAN LINIOWYCH 


Rozwiązanie dwóch układu równań z dwoma 
niewiadomymi, to nie problem. Trzy równania z 
trzema niewiadomymi, to trochę trudniejsze za¬ 
danie. A co zrobić, gdy będzie ich pięć, dziesięć, 
piętnaście ... W tym przypadku przyda się kom¬ 
puter i ten program. Uwzględnia on także układy, 
które nie dadzą się jednoznacznie rozwiązać, 
bądź w ogóle nie posiadają rozwiązania. 


Weźmy najprostszy przykład 

3>: !+2>: 2 =7 
5x *+4x35=1-3 

Ogólnie taki układ (odtąd będę go nazywać układem drugiego stopnia bo ma dwa ro 
wnama i dwie niewiadome) można zapisać następująco 

a n : 'i 1 12 * 52 =b i 
Ćł 2 ^ n ^ S. 2 — ' \ “ b 2 


gdzie dla naszego przykładu a n = 3, a 12 =2, b ^7, itd 

Jak wesz, aby obliczyć i x 2 wystarczy znać współczynniki „a" i „b”. 

Załóżmy ze układ jest dowolnego stopnia, np n = 1, lub n=2 lub inne liczbie natura 
Inej Układ tak wygląda następująco 

^ i i '' i ^ 1 2'"' 2"^" * • 1 i 1 

j "ł" 0 . - 7 ,'ri n ■ ■ m 


a 


■ Z: n'' rv 


=b~ 




Rozwiążmy układ trzeciego stopnia 

1 ) O ił 4* v 4 , "\v — 1 

J. / j T A y T -_'A 3 1 

2) 2i; ± + 5xa+9x3=39 

3 > 4x t +4 ) 2 +i 2 a 3=48 


Cała sztuka polega na takim mnożeniu, dodawaniu odejmowaniu stronami, aby uzys¬ 
kać najprostszą postać równan do obliczenia niewiadomych 

Po pierwsze pozbywamy s ę współczynników przy x, z równań (2) i (3) odejmując od 
nich stronami równanie pierwsze Nie ma prób emu z równaniem (2), ale równan e (3) ma 
współczynnik 4 przy x 1( czyli równanie (1) mnożymy przez dwa 


otrzymujemy 


1 ) 

r»>. i 

1 

4 . / 

(-) 

7v + V.- +7„ — 1 T 

I •••• - '■ 3 1 

-LCT.w + Ca. = “ r Q 

<k.n 1 T Un 2 t j i- 3 _• 7 

T'v.. + X. = 1 7 

i-n j, T 11 ^ ’ - 1 1\ 3 — x 0 

równcnla 1 ) 
itnotf przez 2 / 2*1 
(co oczywióci* 


4x-+6x 3 =26 

poini jam) 

"T I 

J) 

4x i+4k 2 +12x 3 =48 

równani■ 11 
inolf stronami 

(-) 

4 xi+2x 2 + 6x3=26 

przez 4/2-2 


7v -ł- A v ~ T* 
-£.A 2 t 3 


% 

1 ) 

7 v + v +T V = 17 

jl~/\ ' n 2 ' -Jł; 3 1 w 1 


2 ) 

"T t 

j) 

4x 2 + 6 X 3=26 , 
2 x^+ 6 X 3=22 

poduklad przeznaczony 
do analizy 


Teraz pozostawiamy równanie (1) 1 zajmujemy się tylko nowym równaniami (2) i (3), czyli 
analizujemy juz układ drugiego stopnia w ten sam sposob jak poprzednio W tym układzie 
pozbywam sę współczynnika przy x 2 w równaniu (3) poprzez pomnozene równana (2) 
przez 2/4=1/2 odjęcie tak otrzymanej rownosci od równania (3) 


1) 

2 ) 
3) 


n , , —r 

.• v + •/ 4* %v 

/> j ■ .* \ 2 * '-* 1 3 

4x 3 

/ » i—, , —r 

I —— I • \ • 4 , ■. U 

\ / 4 L A r? T J /i “t 


= 13 

=26 

-no 


= 13 


równanie 2 ) 
■nolf stronami 
proi 2/4-1 2 


stąd układ 


T v = Q 
■-*“ 3 


1) 2>i j, + ;<2 + 3 x 3 =13 

2) 4x2+6x3=26 

3) 3x 3 =9 

Widać, ze x 3 = 9/3 =3 stąd x 2 = 26 - 6 

X 3 r9/3=3 

x 2 = (26-6x3) /2= f ’26-18) /2=: 

v — 1 i \ — 1 v 4 - w 1 1 * * ~ 

n J 1 A \ / 1 2 * 3 * I I JUm 

=(13-11)/2=1 

Dla układu n-tego stopnia wygląda to tak 

1'' 2^" 1 ■ 1 
i a i + <3 252^* + ■ 1 ■ + r%"”b 2 


Blp jis j + 3ri—+ • ■ i +3 


“br. 


czyli 


i A i 


X- + 


3 2 iX 


2 X 2 ^ ni 
^22^2^•• 1 ^ 


3'7„X 


równania 1) 
ano** atronaai 
prm a21/all 


3 2 | (321^1 1 ) 3 12 X 2 +» ■ • * ®21^1 l^ln^n = ^ł |) 

9 n 


(3 22 "13 2 i 3 t i)a ł2 )X 2 +.•• + {3 2n “(3 21 Bu)3 ln X n =b 2 “b 1 (3 21 /3 j t ) 


a 22^ 2 


l 32*2 


a n 2 x 2 

otrzymujemy układ 




= bi 

+ . . .+ 

• 

• 

^3n^n 

= bi 

* 

i 

^nn^n 

= bń 

+a i2”2 + *■ 

&ZiZŁ''' ZŁ+ • - 

1 . 

3 ’ \* A 

u J2 m 2 * ■ ■ 

■ 

■ 

- + airv< 

- + ^3n' : 

n b j 

n = bj 

■ 

m 

.+a nn x 

n=b;. 


Omówioną procedurę powtarzam n razy ostatecznie otrzymujemy układ równan 

^1 lX i +3 ± — + ■ . a +Cł i ,-,X 0 =b 1 

&ZHZZ*' ZŁ rk~b 2 


3 *X=b* 

nn n n 

Stąd obliczamy od razu x n potem x n _ b azdox, 

I jeszcze jedna ważna sprawa Okazuje s ę ze obliczenia komputerowe są najdokład¬ 
niejsze gdy a 11t a potem a 22l itd są duże co do wartości bezwzględnej a na pewno rożne 
od 0 Stąd program przeszukuje współczynniki, aby v znalezc największy co do wartość 
bezwzględnej, a następnie zamienia kolumny w ersze tak, aby ten współczynnik znalazł 
się w samym górnym rogu. Jednak zamiana kolumn powoduje zmianę kolejności niewiado¬ 
mych Np zamiana kolumny z niewiadomymi x 2 i x 3 powoduje ze na miejscu x 2 jest x 3 , a 
na miejscu x 3 znajduje się x 2 . Dlatego utworzyłem wektor „X", który wszelkie takie zamia¬ 
ny pamięta Ale jak to działa spróbuj rozszyfrować sam 

Ponieważ przyjąłem, ze układ ma stop en równy n, to musiałem utworzyć tablice 
n(n,n + 1), y(n), w(n), x(n) W tablicy n(n n+1) umieściłem współczynniki w następującej 
kolejności ^ 


^11 

a i — 

m m u 

a i r> 

b Ł 

&Zi i 

&!2Z2 

9 m m 

^ZŁri 

b- 

a„i 

a 0 2 

9 9 9 

^nn 

b n 


abiśca x zapamiętuje kolejność przestawień kolumn, aby odtworzyć potem prawidłowe 

ustawienie zmiennych x,.x n . Tablica w zawiera ostatecznie obi czone wartość? zm en 

nych x ., ... . x n , a tablica y służy do obliczenia niewiadomych 

Jeśli, czego Ci nie zyczę nastąp: STOP w linii 1100 to oznacza ze układ nie jest roz¬ 
wiązywalny 

Niestety musisz wprowadzić współczynnik do tablicy n Dlatego proponuję C napisać 
następujący program główny 
(Wydruk I). 

Dla przykładu wprowadź układ 

2xj+3x 2 +4x 3=20 
x x +2x 2 +8 x 3=29 
r 5x 1 +3>{-+4>i 3 =23 

czyli a 11 =2,a n =3, ł itd 

Otrzymane wynik powinny wynosić x , = 1 

x 2 =2 

x 3 =3 

Dla przykładu proponuję przeanalizować układ 

2 x Ł + 3 x - .+4 x ^=20 

x Ł +2x2+8x3=29 ?! 

4x t +6x2+8x3=40 

Oczywisc e jest on nierozwiązywalny jednoznacznie 

A teraz cos poważnego Z równym powodzeniem można uporać się z układem równan 
w dziedzinie liczb zespolonych Np układ drugiego stopnia wygląda następująco 

(Wi + jti) + {r 12 +jZ 12 )(w 2 +jt 2 )=v 1 + j y i 

r 2 j^ 1^21 ^ 22^ i z 22 ) (w 2 r i 1 2 ) — v2^jy2 

Jest to ukryty zapis układu czwartego stopnia 

f1 1 ^ 1 * ’ i 2 ^ 2 ”Z i 1 £ 1 a Z| 2 t2 = v 1 

r 2iWi + r22 w 2"^2iti*z 22 t 2 -v 2 
Z11W1+212^2^^ utj^r l 2 t 2 =y 1 
Z 2 l^l + Z22^2^^21^ 1^ 22 l 2 = y 2 


Spróbuj sam odpow edz ec na dwa pytania Dlaczego tak można zapisać te równania i w 
jak sposób działa drug* program główny (Wydruk II)? Zwroc uwagę na to, ze est to trochę 
zmodyf kowany program pierwszy 
Dla sprawdzenia rozwiąz równanie drugiego stopnia 


(l+j3)(w 1 ł J t i )+(2+j4)(w 2 +jt 2 )=-20+j22 
(2+j )(w t +iti)+(3+i2)(w 2 +jt 2 ) = -3+j23 


Wynik końcowe w(1) = 1 
t(1)~3 
w(2)-2 
t(2)—4 


Krzysztof Poźniak 
(Klub HOBBYTE) 
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Listing 1 


10 INPUT "STOPIEŃ UKŁADU n~"jn 
2! U I..-' j M W Tl .• 'fi i -1 1 
30 D I M Tl > 

40 [:• IM y<Ti> 

50 D 1 ! v i i " Ti ) 

Mi i;'l p IJ (•••' [ \ ■'■■■■ j | i I 'fi 

70 FOR :;“j TO H 
80 PR I NT : Lv “ , y " , >:■ ; •' >=" 

90 NEKT x 

100 PR INI "b- !, ;y; ,, ) = " INPUT iv:.'y.r,+l> 


NPUT 


i' 


1 ł! 

:. : .i NET 

:t 

y 



120 FGF 

5: [■: 

• j 


TO 

13 i. 

i LEI 

■' 

•:< {•: 


:*=k 

14 ii 

d ne: 

TT 
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i GOS 
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i I 

■100 

17 i 

3 EOF 
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; ::::: J 
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.!. O 1 : 
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1 
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T ,f ; 

i 

3 NET- 

Tl 

i 

K 



20t 

3 sT l 

ip 




i 0 

I NP U 

!T 

m r*- 

1 

OPIE 

26 

DIN 

Ti' 

2 :ł 

fi 

■ 21 Ti 

30 

DJM 

f 

2% 

Tl 

i 

48 

DIN 

y v 

2% 
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50 

DIN 
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j 

60 

FOR 

y — 
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j. 

T 

0 Ti 

70 

FOR 


1 
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U Ti 

SU 

PR IN 

IT 
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i 

" * y • 

•***! 

ij 

! pi 

-f!< 

ri+ 

y 

, n+x 

»""f Kir 

o 

PR IM 
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-T... 

i 

*' ; y 

O i 

LET 

Ti*: 

y 

Tl 

•T .i “z: 

90 

NEXT 






Listing 2 


100 PR IN r "v< 0y.i " >=" INPUT w y , 2*n+l ) 
105 PR INI "y( " y ,ł )=" INPUT m n + y , 2:fcn+j. 
110 NEXI y 
1 Z O Puk' k = 1 fU ET'u 
130 LET x< k >=k 
140 NEXT k 


4 5 L.E ! ■n=ET'T! 


150 

170 

180 
185 

190 
200 

GOSUB .1 00i 
FOR k = j. Ti 
PR I NT 

PRINT "t- 
NEXT k 
STOP 

1 000 

POR k = f Tm 

1 0 1 0 

i FT I RX=0 

1 02:0 

FOR y -"“k; TO 

i 030 

FOR :#!■;: TO 

1 040 

i 1 o 'i. i i'i. 

1 050 

LE T LRX=-s.< ■ 

1 060 

LET MY=y 

1 070 

LET MX=x 

1 030 

NEXT x 

1 090 

NEXT y 

1095 

REM Jes fi 

1 | 00 

JF 1.RX :: =0 T 

1 1 1 0 

FOR 1=1 TO 

1120 

LET ZUPOM- 

■f i ■«r:i 


J. .1. ■ ::<0 

Lr:, i ii', k > l. ' 

1.1.40 

LET mlTT,l. 

1150 

NEXT I 

1160 

FOR 1=1 TO 

11 70 

LET ZMP0M= 

1180 

LET . 1 , k ) 

1190 

LEI rv: 1 . NX 

i 200 

NEX T 1 

1210 

1 O O f 3 

LET ZNROM™ 

J. T.j 

1230 

L!:::. i .' ; k 1 — 
LET xvMX>= 

1246 

RlM e | emeri 

lii 1. 0 

wyro 9or'iTy ru 

•emy i. 

itedy Ti a i i.i.i i 

1258 

FOR l=k+1 

126@ 

i “■ "7 | ; i 

LET MN OZ -Ti 

Cpp j—L |1 

I ■:... i U 

1288 

1 L'l'-. U —I- 1 .1. 

I....E 1 Ti 'i 1... ..i 

1299 

NEXT ,i 

i 300 

NEXT 1 

1310 

NEXT k 

1320 

FOR k=r. TO 

1330 

LET sum 3.-8 

1348 

FOR 1=k+1 

1350 

LET SUNfl-S 

1360 

NEXT 1 

1370 

LET y< k >=< 

1.338 

NEXT k 

1390 

FOR k=J TO 

il. 400 

LET i.i.i < k i 

1410 

NEX"I v 

1420 

REM tablic 

1 430 

RETURN 


, l.l>: ■: ' 


Listing 3 




WARTO PRZECZYTAĆ 



Nareszcie u/yiKuwmcy miKioKurn- 
puierow, chcący nauczyc się posługiwania 
językiem LOGO, przestają byc skazani na 
mozolne wyszukiwanie cennych informacji 
rozproszonych w wielu numerach kompu¬ 
terowych czasopism, „Logo na Sinclair 
Spectrum dla początkujących Stanisława 
Waligórskiego est bowiem pierwszą — 
lecz juz wfadomo, ze me ostatnią — pozy¬ 
cją książkową traktującą o tym popularnym 
języku 

Autora nie trzeba czytelnikom „Bajtka’ 
przedstawiać — był on przewodniczącym 
zespołu opracowującego program „ele¬ 
mentów informatyki w szkołach i jest 
współtwórcą polskiej wersji LOGO (patrz 
wywiad w n-rze 9/86 , Bajtka”). Stąd treść 
liczącej niespełna 60 stron książeczki napi¬ 
sana jest w pewnej mierze pod kątem uzy 


cia LOGO w szkole, me znaczy to jednak, 
ze prywatny użytkownik komputera nie 
znajdzie tu niczego dla siebie. 

Książka przeznaczona jest również dla 
tych którzy stykają się z komputerem po 
raz pierwszy: część tekstu poświęcono za¬ 
sadom obsługi Spectrum i sposobowi 
wczytywania LOGO z magnetofonu. W dal 
szej kolejności czytelnik jest zapoznawany 
z kolorową grafiką żółwia i metodami posłu¬ 
giwania się mą. Tę częsc książki - z wyjąt¬ 
kiem może rozdziału poświęconego kolo¬ 
rom — można polecić również użytkowni¬ 
kom Atari lub Amstradow, 

Nie jest to jednak — co warto podkreślić 
— tylko kurs języka programowania Wiele 
uwagi poświęcono w książce metodom roz¬ 
wiązywania problemów, i to już na etapie 
pierwszych prostych cwiczen 

Całość dotyczy angielskiej wersji LOGO 
lecz na końcu książeczki zamieszczono 
słowniczek polskiej i angielskiej wersji języ¬ 
ka. Dodatkowo mieści się tam opis wszyst¬ 
kich komend wraz z objaśnieniami. 

Wadą publikacji jest przede wszystkim 
niewielka objętość Wiedzę zawartą w 
książce można posiąść w trzy dni, a co da¬ 
lej? Na szczęście w niedługim czasie zapo¬ 
wiedziana jest częśc druga — „Logo na 
Sinclair Spectrum dla zaawansowanych” 

(mb) 

Stanisław Waligórski „Logo na Sinclair 
Spectrum, Częsc 1 — dla początkują¬ 
cych” Wyd. I, IWZZ Warszawa 1987; 
s. 56, nakład 50 tys. egz. 



Stołeczny Ośrodek 
Elektronicznej 
Techniki Obliczeniowej 


Piotr \damczewski 


INSTRUKCJA OBSŁUGI KOUPUTtillA ATARI *00 AL 


Warszawa 19 87 r 


Instrukcja obsługi mikrokomputera 
Atari 800 XL 

Dotychczas jedynym polskim podręczni¬ 
kiem dla użytkowników komputerów Atari 
był skrypt „Atari BASIC’ pod redakcją Wie 
sława Miguta Zapowiadane od dłuższego 
czasu przez KAW wydanie książkowe jesz 
cze nie doszło do skutku Wykorzystało tę 
lukę warszawskie SOETO wydając (także 
jako skrypt) „Instrukcję obsługi mikrokom¬ 
putera Atari 800 XL”, która powinna się 
znalezć w bibliotece każdego posiadacza 
tego komputera. 

Książka składa się z czterech części. 
Część pierwsza zawiera opis komputera, 
sposob jego podłączenia i eksploatacji oraz 
działanie klawiatury ze szczególnym uwz¬ 
ględnieniem klawiszy funkcyjnych i specjal¬ 
nych Na końcu tej części znajduje się opis 
użycia komputera jako prostego kalkulatora. 
Część druga jest dokładnym opisem instru¬ 
kcji wbudowanego interpretera języka BA¬ 
SIC oraz ich składni, popartym licznymi 
przykładami. Częśc trzecia stanowi wpro¬ 


wadzenie do programowania w języku ma¬ 
szynowym mikroprocesora 6502 Zawiera 
listę rozkazów procesora oraz ich krótkie 
wyjaśnienie Czwarta częśc jest złozona z 
trzech dodatków uzupełniających treść 
książki oraz opisu podstawowych urządzeń 
peryferyjnych komputera Atari. 

Książka jest napisana przystępnym języ¬ 
kiem, który oszczędnie operuje zwrotami 
technicznymi i jest dzięki temu łatwo zrozu¬ 
miała nawet dla początkującego czytelnika 
Wiadomości i informacje techniczne o bu¬ 
dowie wewnętrznej są podane w ilości 
niezbędnej do zrozumienia zasad obsługi 
komputera. Za zbyt pobieżną można uznać 
jedynie część dotyczącą języka maszyno¬ 
wego, lecz jest to usprawiedliwione przez¬ 
naczeniem podręcznika dla początkujących 
użytkowników 

Należy stwierdzić, ze wydanie tej książki 
zapełni dotkliwą lukę na naszym rynku wyda¬ 
wniczym, a jej poziom merytoryczny spo 
woduje ograniczenie napływu licznych tłu¬ 
maczeń sprzedawanych przez rożne firmy 
prywatne po astronomicznych cenach Inic¬ 
jatywa ta jest tym cenniejsza, ze komputery 
firmy Atari rozprowadzane przez , Pewex ! 
zdobyły w Polsce ogromną popularność, 
brak jest natom ast dotyczącej ich literatury 

Książka jest do nabycia w siedzibie SOE¬ 
TO — Warszawa, ul. Hoża 50 


(ziew) 


Piotr Adamczewski — „Instrukcja ob¬ 
sługi mikrokomputera Atari 800 XL”, 
Warszawa 1987, Stołeczny Ośrodek 
Elektronicznej Techniki Obliczeniowej. 
Wydanie I. Nakład 5 tys. egz. Cena ok. 
600 zł. 


T3 A TH -1 TT' TT H /OH 


91 












































OPINIE 



na Przylądku Kennedy ego 


Komputery zajmują 
nas dziś w równym sto¬ 
pniu jak kosmonautyka 
w latach 60-tych. 

Kosmonautyka dotyczyła jednostek, 
a pisali i mówili o mej wszyscy Kos¬ 
monautyka ogniskowała wyobraźnię 
pisarzy należących do klanu science 
fiction Ale dopiero kiedy poleciał w 
kosmos Hermaszewsk zaczęliśmy 
mowie na serio o przeciążeń ach, o 
odwapnieniu kości.. Okazało się 
więc, ze mieliśmy o kosmonautyce 
częściowo fałszywe wyobrażenia po¬ 
nieważ dotyczyła nas zaledwie pośre¬ 
dnio 

Nie mówię, ze dokładnie tak jest 
dziś z komputerami W przeciwień¬ 
stwie do rakiet kosmicznych kompu¬ 
tery osobiste są w powszechnym uży¬ 
ciu Ale jeszcze powszechniejszym 
jest teflon który zawdzięczamy kos¬ 
monautyce Natomiast mimo setek ty¬ 
sięcy komputerów w Polsce nie ko¬ 
rzystamy z sieci komputerowej, me 
mamy skomputeryzowanych banków 
(me wewnętrznie lecz między sobą), 
me mamy komputerowych bez da¬ 
nych Komputer może stać w moim 
mieszkaniu, mogę łupać na mm p ; ęc 
godzin dziennie w wyrafinowaną grę 
„Chodzi lis koło nory , a mimo to byc 


Znam parę dobrych opowiadań fan¬ 
tastycznych o komputerach Rzecz 
znamienna, wszystkie one mają tona¬ 
cję przestrzegającą Ale jednocześnie 
właściwie żadne z opowiadań me trak¬ 
tuje o mmanentnym fatalizmie zawie¬ 
rającym się w maszynie, lecz o krak¬ 
sie rodzącej s ę na styku komputera i 
człowieka O kraksie wynikającej z 
niedopasowania bądź człowieczej in¬ 
trygi „NACISNIJ ENTER” Varley’a 
mówi o policyjno wojskowym osacze¬ 
niu jednostki przez siec komputero¬ 
wą. Komputer jest tu narzędziem inwi¬ 
gilacji i zniewolenia W , Wynajętym 
człowieku Baranieckiego to ludzie 
wprowadzili do komputera pokłado¬ 
wego program szaleńczej gry o wszy¬ 
stko, w wyniku ktorego to ludzie będą 
się musieli zabijać Jest takie stare 
opowiadanie Zajdla , Dyżur' — do 
naukowca zatrudnionego w stacji 
komputerowej dzwonią interesanci i w 
momencie awarii systemu ten dyżur¬ 
ny naukowiec rozwiązuje zadanie za 
komputer na zwykłym suwaku Wpra¬ 
wia to zleceniodawcę w osłupienie 
Jest wreszcie wspaniałe opowiadanie 
o komputerze pracującym w składnicy 
księgarskiej i o sporze między mm a 
jednym z nabywców co doprowadza 
do skazania owego nabywcy na karę 
śmierci za kdnapmg Jedynym grze¬ 
chem owego nabywcy była niechęć 
do płacenia za zdefektowany egzem¬ 
plarz „Porwanego za młodu’ Ste- 
vensona Człowiek osaczony, odda¬ 


jący się niebezpiecznej zabaw e, czło¬ 
wiek dobrowolnie ogłupiony — oto co 
według pisarzy fantastow, może nam 
zagrozić w wyniku upowszechnienia 
się komputerów W em, ze to bajki, ale 
w każdej bajce jest ziarnko mądrości 

Nie za często i niezbyt pilnie prze¬ 
glądam „Bajtka , a potem rozmawam 
ze szczęśliwymi posiadaczami kom¬ 
puterów Jak Polska długa i szeroka 
rozlega się wołanie o program Trochę 
mnie to przeraza I w „Bajtku” i w 
„Komputerze przynajmniej co drug 
numer, może delikatnie ale zawsze, 
może zbyt drobną czcionką ale na 
tyle dużą, ze można ją odczytać, są¬ 
czycie niezbędne zastrzeżenie — 
komputer me zrobi, nie obejmie, nie 
wymyśli za nas wszystkiego Jest tym 
dla mózgu czym rower dla ciała (to 
bodaj z W Siwińskiego) — pomoże 
się poruszać, ale trzeba pedałować 

Trzeba pedałować — zastrzeżenie 
pierwsze Nie można na rowerze zała¬ 
twić wszystkiego — zastrzezeme dru¬ 
gie Nie można oczekiwać, ze rower 
pofrunie — oto bardzo ważne zastrze¬ 
żenie trzecie. Wszystkie te analogie 
są oczywiście kulawe bo ktoś tam 
przeleciał przez La Manche właśnie 
na latawcu napędzanym pedałami No 
dobrze, ale rowery w dalszym ciągu 
me służą do latania. Do czego nato¬ 
miast nie służą komputery'? 

Powiedziałem — rozlega się woła¬ 
nie o program Słyszę w nim skowyt 
niebezpiecznej, bo nigdy me zaspo¬ 
kojonej pożądliwości — wymyślcie, 
skonstruujcie, zestawicie mi program 
na wszystko. Tu juz nie chodzi o gry, 
o ładne grafiki, o podręczny katalog 
książek, domową encyklopedię, o bu¬ 
dżet, terminarzyk domowy Tu cho¬ 
dzi o program na życie Nie ma i nie 
będzie takiego programu. 

Naprawdę sytuacja jest dziwna 
Człowiek — istota myśląca, użytkują¬ 
ca zaledwie kilkanaście procent mocy 
swego mózgu, buduje urządzenie, 
które go z tej pracy jeszcze odciąży 
To znaczy inny człowiek buduje, a 
inny się odciąża. Człowiek istota wie¬ 
lowymiarowa — myśląca fizyczna i 
metafizyczna, estetyczna, uczuciowa 
obdarzona zdolnością odróżniania do¬ 
bra od zła — redukuje swój wielowy¬ 
miarowy ęzyk intelektualny i ducho¬ 
wy, swoją roznorodną technikę poro¬ 


zumiewania się przy pomocy słów, ale 
także gestów intonacji, grymasów 
do kodu elektronicznej maszyny 
Wręcz dostosowuje swój bogaty język 
do prostego języka maszyny i czym z 
tego cnotę Istota, która lat temu dzie¬ 
sięć, dwadzieścia, trzydzieści przezy¬ 
wałaby roznorodne fascynacje lektu¬ 
rowe, filmowe, muzealne, teatralne, 
uczuciowe ale i filozoficzne — dziś 
doznaje pełnej satysfakcji i intelektual¬ 
nej Szczęśliwości kreśląc na nieo¬ 
strym ekranie drgające bryły, bądź łu¬ 
piąc w klawiaturę przy okazji gry w 
wyjmowanie pierścienia z zaczarowa¬ 
nej komnaty i w zestrzeliwanie przy¬ 
byszów z kosmosu 
Trochę me wiem jak z nimi rozma- 
w ac Kiedy próbuję im mow c o ogra ¬ 
niczeniach czy zastrzeżeniach Chur- 
cha, Godła i Turinga, zarzucają mi 
wsteczmctwo i oświadczają, ze facet 
taki jak ja unieszczęśliwi syna Odpo¬ 
wiadam bardzo poważnie, że syn ak¬ 
tualnie uczeń klasy VIII-ej, przerabia 
„Pana Tadeusza i ze do zrozumienia 
tragicznych tonow Ep logu, do przeni¬ 
knięcia cynicznej mampulacyjno-poli- 
tycznej gry jaką uprawia Gerwazy w 
scenach Rady, komputer mojemu sy¬ 
nowi me przyda się na nic Fanatycy 
komputerowi nie podejmują tematu 
ale natychmiast oświadczają, że zmie¬ 
niłbym poglądy, gdybym sobie sprawił 
WORDPROCCESSOR Odpowiadam 
krotką kalkulacją kosztow (ekran + 
drukarka + komputer) i podliczam 
skromną liczbę stron jakie zaczerniam 
w ciągu miesiąca Dodaję jeszcze, że 
lubię szelest długopisu po maszyno¬ 
pisie i te rodzące się w głów e pomy¬ 
sły i poprawki kiedy po raz kolejny 
przepisuję pokreślony tekst, a nie 
wtedy, gdy go za mnie wystukuje dru¬ 
karka Mówię wtedy, ze jestem prymi¬ 
tywem. Odpowiadam by sprawili 
wordproccessor Szekspirów i Mickie¬ 
wiczowi Po czym ponieważ atmosfe¬ 
ra robi się gorąca próbujemy zadzwo¬ 
nić (od sąsiadów lub z połykającego 
monety automatu) do którejś z najbliż¬ 
szych knajp zęby tam się pogodzić 
przy stoliku pod palmą bądź do kina, 
zęby zarezerwować miejsce w 7-mym 
rzędzie na „Elektronicznego morder¬ 
cę ’. Niestety — tełefon me odpowia¬ 
da. Tak oto się bawimy i to jest moja 
przewaga, bo przecież bawimy się 
bez komputera Kiedy to podkreślam 










wpadają we wściekłość, a jeden z nich 
rzuca we mnie nawet przepalonym joy¬ 
stickiem 

I wtedy, uderzony w głowę doznaję 
porażenia odkryciem, ze oto ja, czło¬ 
wiek przednówka XXI wieku, nad któ¬ 
rego głową fruwają setki satelitów ko¬ 
munikacyjnych — me mogę dodzwo¬ 
nić się do kina odległego o parę kilo¬ 
metrów Wracam więc do porównania 
między erą kosmiczną przed trzydzie¬ 
stu laty a komputerową dzisiaj: Kos- 
monautyka dotyczyła jednostek a pas¬ 
jonowali ssę mą wszyscy, komputery¬ 
zacja mogłaby dotyczyć wszystkich, 
a e dotyczy naraz e tylko jednostek (z 
personalnymi komputerami). Miliardy 
Kilobajtów są zatrudniane w Polsce 
każdego dnia, bez żadnego ogólnego 
pożytku 

Pyta mnie redakcja „Bajtka”, jak so¬ 
bie wyobrażam komputeryzację u nas 
w roku 2000 9 Nie bardzo ją sobie wy¬ 
obrażam bo jestem facetem pozba 
wionym wyobraźni. Umiem natomiast 
marzyc, jak wszyscy Marzenia pro¬ 
wadzą mnie ku wizji manii komputero¬ 
wej meco spokojniejszej i nieco lepiej 
zorganizowanej i spożytkowanej Ma¬ 
rzą mi się komputery stojące za nas w 
kolejkach (mówię to metaforycznie 
rzecz jasna), strzegące punktualności 
pociągów i samolotow nie mylące się 
przy okazji przy wypłacaniu rent i wy¬ 
stawianiu rachunków za gaz; marzą mi 
się komputerowe bazy danych sprzę¬ 
żonych z ogólnodostępnymi kseroko¬ 
piarkami, komputerowe konta (z wy¬ 
mienialną złotówką), komputerowe 
podręczne turystyczne translatory fo- 
mczno-tekstowe, komputerowe biura 
podroży, komputerowy gazmk w 
maluchu 1 Szczerze mówiąc trudno mi 
nawet marzyc, bo z trudnością nadą¬ 
żam za tym co bywa wdrażane w Ja¬ 
ponii i na Zachodzie. 

Moje duchowe skłonności prowa¬ 
dzą mnse ku innym jeszcze kwestiom, 
filozoficznym. Otóż marzy mi się, ze 
ogolna komputeryzacja, jaka bez wąt¬ 
pienia nastąpi, me pociągnie za sobą 
wymogu redukcji człowieczeństwa do 
poziomu jaki najbardziej odpowiada 
maszynie Dlatego czekam na mo¬ 
ment, w którym powszechnie będzie 
już uświadomiona prawda, że najlep¬ 
szy program me wyjaśnia wszystkie¬ 
go, ze są rzeczy z dziedziny ducha 
(poezji, etyki, estetyki, rehgii, dobra), 
które w nikłym tylko stopniu będziemy 
mogli zaczerpnąć z mózgów elektro¬ 
nowych, jeśli im w odpow ednim mo¬ 
mencie me przygotujemy m ejsca we 
własnych głowach i sercach 

Tak więc marzy mi się, że cała gra¬ 
matyka myślenia maszynowego jaką 
teraz przerabiamy, me tylko wymości 
nam komputerową wygodą przyszłe 
życie, lecz zbliży nas do zrozumienia 
fenomenu jakim jest myślenie i prze¬ 
zywanie człowieka Kiedy to nastąpi 
będziemy mogli wdrożyć jedyny właś¬ 
ciwy program jaki można sobie wyo¬ 
brazić Będzie to program wdrażania 
komputeryzacji me zaborczej, znają 
cej swoje granice a więc komputery¬ 
zacji kompatybilne do CZŁOWIEKA 


EFEKTYWNOŚĆ 


Maciej Parowski 


Kontynuujemy prze¬ 
gląd podstawowych 
elementów techniki pi¬ 
sania programów, ma¬ 
jących wpływ na efek¬ 
tywność otrzymanego 
kodu. 


Zaczniemy od przykładu, w którym 
wyjątkowo uda się zaoszczędz c i cza¬ 
su i pamięci. Poniższy program nadaje 
wartości początkowe elementom 
dwóch tablic T i A 
PROGRAM P6 
FOR 1 = 1 TON 
T(l) = 0 
NEXT I 

FOR 1 = 1 TON 
A(l) = l 
NEXT I 

Wykonanie pętli to me tylko wyko¬ 
nanie N razy zawartych w mej instruk¬ 
cji (w naszym przypadku podstawie¬ 
nia) ale rowmez wykonanie tyle samo 
razy operacji pomocniczych, służą¬ 
cych do zorganizowania pętli, takich 
jak zwiększenie wartości zmiennej I o 
1, sprawdzenie czy juz I równa się N 
itd Jednym słowem organizacja pętli 
tez kosztuje — widać to wyraźnie jeśli 
organizujemy tę pętlę sami, przy po¬ 
mocy skokow warunkowych W takim 
razie, skoro juz jedną pętlę zorganizo¬ 
waliśmy, to wykorzystajmy ją do mak¬ 
simum 

FOR 1 = 1 TO N 
T(l) = 0 
A(l) = l 
NEXT I 

W ten sposob skracamy również pro- 
gram o kod potrzebny na zorganizo¬ 
wanie drugiej pętli. 

Skoro juz mowa o minimalizacji ko¬ 
sztów organizacji pętli, to popatrzmy 
na następujące instrukcje 
FOR 1 = 1 TO N*M 
T(l) = l 
NEXT I 

Zęby sprawdzić, czy I osiągnęło juz 
końcową wartość trzeba po każdym 
wykonaniu zawartości obliczyć war¬ 
tość wyrażenia N*M I jest to oblicze¬ 
nie niepotrzebne, bo wartości N i M 
me zmieniają się wewnątrz pętli, więc 
można zrobić tak 
NM = N*M 
FOR 1 = 1 TO NM itd 

Przejdźmy teraz do następnego za¬ 
gadnienia, którym jest wykorzystanie 
w programach tzw zmiennych indek¬ 
sowanych, czyli odwołań do elemen¬ 
tów tablic Są one kosztowniejsze niż 
odwołania do zwykłych zmiennych, 
gdyż wymagają obliczenia położenia 
w pamięci żądanego elementu tablicy 
na podstawie podanych indeksów 
Rozważmy następujące zadanie 
mamy dane współczynniki A, B, C 
trójmianu kwadratowego, czyli funkcji 
A*x 2 + B*x + C W tablicy X są war- 


ELEGANCJA (1) 


tosci x, dla których trzeba obliczyć 
wartość trójmianu Można to zrobc 
tak 

PROGRAM P7 
FOR 1 = 1 TON 

PRINT A*X(I)*X(I) + B*X(I) + C 
NEXT I 

trzy razy odwołując się do tego same 
go elementu X(l) Można rowmez 
uzyc zmiennej pomocniczej, która po¬ 
zwoli tego uniknąć 

PROGRAM P8 
FOR 1 = 1 TON 

POM = X(l) REM czy to podsta¬ 
wienie musi być w pętli? 

PRINT A*POM*POM + B*POM 

+ C 
NEXT I 

W naszym przykładzie użyliśmy tabli¬ 
cy zawierającej liczby, jednak takie 
podejście stosuje się do tablic wszyst¬ 
kich typów 

Następnym godnym uwagi źródłem 
oszczędności są wyrażenia arytmety¬ 
czne. Obliczmy dwa pierwiastki troj- 
mianu kwadratowego 
XI = (-B - SORT (B*B - 4*A*C)) / 
(2*A) 

X2 = (-B + SORT (B*B - 4*A*C)) / 
(2*A) 

Dwa razy obliczana jest dokładnie ta 
sama wartość pierwiastka Można to 
łatwo usprawnić, wykonując oblicze¬ 
nie pomocnicze i zapamiętując jego 
wynik 

PROGRAM P9 

SQ = SORT (B*B - 4*A*C) 

XI = (-B - SQ) / (2*A) 

X2 = (-B + SQ) / (2*A) 

Jest to usprawnienie tym bardziej wa¬ 
żne, ze obliczanie wartości funkcji 
matematycznych, takich jak pierwia¬ 
stek, logarytm, sinus itd wymaga wy¬ 
konania przez komputer dużej liczby 
obliczeń, a więc zajmuje wielokrotnie 
więcej czasu mz zwykłe działania aryt¬ 
metyczne czy podstawienie wartości 
na zmienną Jednak zapamiętywanie 
na zmiennych pomocniczych tych 
fragmentów wyrażeń arytmetycznych, 
które powtarzają się w programie wie ¬ 
lokrotnie, jest opłacalne nawet gdy me 
występują w nich wywołania funkcji 

W programie P9 możemy jeszcze 
„pozbyć się jednej operacji dziele¬ 
nia 

POM = 1/(2* A) 

SQ = SORT (B*B - 4*A*C) 

XI = (-B - SQ) *POM 
X2 = (-B + SQ) *POM 

Zrobiliśmy to kosztem użycia dodat¬ 
kowej zmiennej i... zmniejszenia się 
czytelności programu 

Ważna jest umiejętność przekształ¬ 
cania wyrażeń arytmetycznych W 
programie P8 możemy usunąć z pętli 
jeszcze jedno mnożenie tylko dzięki 
wyciągnięciu przed nawias — popatrz¬ 
cie uważnie 

Oszczędność czasu wykonania mo¬ 
żna uzyskać również dzięki właściwej 
budowie programu Znowu posłużymy 
się przykładem: 


PROGRAM PIO 

IF DTYG = 1 THEN PRINT "ponie¬ 
działek” 

IF DTYG=2 THEN PRINT "wtorek” 
IF DTYG=3 THEN PRINT "środa” 

Z trzech powyższych warunków tylko 
jeden może byc prawdziwy, niemniej 
jednak nawet jeśli prawdziwy jest juz 
pierwszy, to i tak sprawdzane będą 
wszystkie 1 Możemy tego umknąć jeśli 
język, w którym programujemy rozpo¬ 
znaje konstrukcję IF... 

THEN ... ELSE. Możemy wtedy napi¬ 
sać 

PROGRAM Pil 
IF DTYG = 1 THEN 
PRINT "poniedziałek" 

ELSE 

IF DTYG=2 THEN 
PRINT "wtorek” 

ELSE 

IF DTYG=3 THEN 
PRINT "środa” 

ENDIF 

ENDIF 

ENDIF 

Niektóre języki programowania, np 
PASCAL, zawierają specjalną instruk¬ 
cję CASE która pozwala zapisać to 
samo co zawiera program P11 w dużo 
wygodniejszy sposob 
Ważnym elementem programów są 
procedury, lub jak kto woli podprogra¬ 
my Instrukcja wywołania podprogra¬ 
mu jest instrukcją dosc kosztowną, 
przy czym koszt jest tym większy im 
więcej parametrów przekazujemy do 
wołanego podprogramu Jednak upa¬ 
trywanie źródła oszczędności w elimi¬ 
nacji podprogramów było by dużym 
błędem Rozsądnie dobrane podpro¬ 
gramy są elementem praktycznie 
niezbędnym przy realizacji prawie 
wszystkich zadań, a zyski płynące z 
ich używania zawsze przekraczają ko¬ 
szty wywołań Pamiętajmy tylko, ze je¬ 
śli me jest to konieczne, to nie należy 
umieszczać wywołań wewnątrz pętli. 

Na zakończenie chciałbym jeszcze 
raz przypomnieć, ze jak w każdej 
dziedzinie życia, tak i w programowa¬ 
niu potrzebny jest zdrowy rozsądek. 
Chciałbym, aby podane wyżej przy¬ 
kłady i zasady posłużyły Wam do zro¬ 
zumienia pewnych mechanizmów wy¬ 
stępujących przy realizacji programów 
przez współczesne komputery Nato¬ 
miast potraktowanie podanego mate¬ 
riału jako zbiór zasad, których należy 
ślepo i bezmyślnie przestrzegać 
może w szczególnych przypadkach 
przynieść w ęcej strat mz pożytku 
Pamiętajmy również, ze programu 
zbudowanego w oparciu o nieefekty¬ 
wny, za wolny algorytm me uratują ża¬ 
dne sztuczki programistyczne, oraz o 
tym, że nadrzędną wartością dla pro¬ 
gramów jest poprawne działanie Pro¬ 
gram w pełni zoptymalizowany, ale 
działający niepoprawnie jest zupełnie 
bezwartościowy 


Andrzej Pilaszek 



PROGRAMY KOMPUTEROWE, 
INSTRUKCJE I UDOSKONALENIA TECHNICZNE 

POCZTĄ 

DLA 

ATARI, AMSTRADA, 
COMMODORE’A 
I IBM 

wysyła 

AGENCJA MIKROKOMPUTEROWA 
SOSNOWIEC P-157 
tel. 699-649 

K-87 


Informujemy, że nastąpiła zmiana cen za 
ogłoszenia zamieszczane w Bajtku. 

Aktualnie cena reklamy biało-czarnej wy¬ 
nosi 300 zł za 1 cm 2 . Do ceny podstawowej 
doliczane jest 30% za dodatkowy kolor i 
100% w przypadku reklamy wielobarwnej. 

Ogłoszenie drobne kosztuje 200 zł za jed¬ 
no słowo. 


WOJEWÓDZKIE PRZEDSIĘBIORSTWO 
HANDLU WEWNĘTRZNEGO 
0/GLIWICE INFORMUJE 
P.T. KLIENTÓW, ŻE SKLEP 

„ELEKTRON” 

W GLIWICACH 
PRZY UL. ZWYCIĘSTWA 56 

— PROWADZI: 

SKUP I SPRZEDAŻ 
MIKRO-KOMPUTERÓW 

— urządzenia peryferyjne 

— osprzęt i oprogramowanie 

— sprzęt magnetowidowy 

Sklep prowadzi sprzedaż pożarynkową 
Telefon: 31-45-71 

Punkt skupu i sprzedaży czynny od 11.00—16.00 

Zapraszamy 

UWAGA!!! 

Oczekujemy zamówień na konkretne urządzenia. 

K-118 




sincrlaii - 

Z X Spectrum 
SERYICE 



—ATARI - 

ZX SPECTRUM 

INSTRUKCJE • OPISY 
LITERATURA 

KATALOGI - GRATIS 
SZKOŁY I KLUBY - ZNIŻKA 

WYSYŁKA NA CAŁY KRAJ 

Wypożyczalnia Programów 

D. H. „SEZAM” II p., g. 16.00—19.00 

00-849 Warszawa UPT 66 skr. p. 14. 


D 84 


Klawiatury do ZX SPECTRUM 
Telewizory turystyczne 
VELA • ELEKTRONIKA 
JUNOST • NEPTUN 

NAPRAWIAM 

Warszawa-Ursynow, u(. Wasil¬ 
kowskiego 6/60. 

Dojazd 503, 504, 505 do pętli, 
czynne 9.00—17.00. d -93 


Studio . RETURN” 

ATARI • AMSTRAD • SPECTRUM 
• IBM 

wypożyczalnia programów i literatury, 
Warszawa, ul. Targowa 32, tel 19-10- 
34, g 11.00—19.00 Rachunki oraz 
wysyłka pocztą D 56 



ATARI, SPECTRUM, 
AMSTRAD 

— programy, polskie instrukcje 
wysyła „MEGABAJT” 

— Warszawa, 

Paryska 17/29 — tel. 17-76-16. 

D-74 


Programy na 

ATARI i SPECTRUM 

tamo wypożyczysz na miejscu lub 
za zaliczeniem pocztowym. Infor¬ 
macja za załączeniem koperty i 
znaczka 
MICROMAN 

40-181 Katowice, ul. Osikowa 66, 
tel. 585-106 

D 43 


Redakcja nie ponosi odpowiedzialności za treść ogłoszeń 










































Giełdy Bajtka odbywają ssę w Warszawie przy ul. Grzybowskiej 35 (Szkoła Podstawowa nr 25) w każdą sobotę od 14 do 19 oraz w każdą niedzielę od 10-16 przy ul. Sask ej 78 (Technikum Chem czne) 




GIEŁDA 
BAJTKA 
(tys zl) 

PEWEX 

BALTONA 

(USD) 

RFN 

(sred) 

(DM) 

SINCLAIR 

ZX 81 

40-50 

— 

39 

ZX Spectrum 48 KB 

110 

115 

150-200 

ZX Spectrum Plus 

125-140 

— 

180-280 

ZX Spectrum 128 + 2 

240 

— 

— 

Drukarka SEIK0SHA GP 50S 

80-120 

— 

199 

TIMEX 2048 

120 

146 

— 

Joystick 0UICKSH0TII 

9-11 

— 

9-15 

COMMODORE 

C-64 (nowa wersja) 

225 

219 

370-449 

C-128 

390-430 

299 

590 

C-128D 

850 

— 

1199 

Amiga z monitorem kolorowym 

— 

— 

2900 

Magnetofon 1531 

35-40 

48 

49-65 

Stacja dyskietek 1541 

230-250 

— 

450 

Stacja dyskietek 1571 

310 

299 

490-540 

Drukarka MPS 801 

200-240 

— 

199 

Dysketki 51/4 (średnia jakość) 

0 65-1 5 

35 

0 5-18 

ATARI 

65XE 

140 

125 

40-180 

130 XE 

205-220 

199 

360 

Stacja dyskietek 1050 

210 

187 

370 

Drukarka 1029 

240 

199 

299 

ATARI 520 STMst dysk 05Mb 

800-900 

— 

970 

AMSTRAD 

464 z monit monochromat 

290 

— 

520 

6128 z monit monochromat 

510 

— 

900 

6128 z monitorem kolorowym 

600 

— 

1250 

PCW 8256 

— 

— 

1500 

Dyskietki 3 

5-65 

— 

7-12 

Stacja dyskietek 3 do 464 

195 

— 

520 

PC 1512 SD 

— 

— 

1189 


NOWOŚĆ? 


Przebój sezonu 1983 na komputerowym rynku, czyli 
Commodore 64 dotarł juz do Pewexu, wiosną 87 r. Zasko¬ 
czenie okazało się wielkie w równym stopniu dla potencja¬ 
lnych nabywców co dla krajowego importera, bowiem 
kilkugodzinne próby uzysKama szczegółowych informacji 
u źródła, czyli w firmie Pewex me należały do udanych. 
Rozmówcy mniej lub bardziej uprzejmie przekazywali wy¬ 
łącznie numery telefonów różnych działów funkcyjnych i 
zamiast informacji o mikrokomputerach udzielono nam 
precyzyjną lekcję poglądową o strukturze organizacyjnej 
przedsiębiorstwa, wykazując tym samym totalną ignorancję 
w dziedzinie sprzedawanego przez Pewex asortymentu 
towarow W tej sytuacji prawdziwym zaskoczeniem było 
uzyskanie zwykłej, rzetelnej informacji. Autorem niespo¬ 
dzianki była Spółka z o o MERCOMP prowadząca serwis 
Commodore, która przejęła po Pewexie działalność pro¬ 
mocyjną Spółka posiadająca tak poważnych współudzia¬ 
łowców jak LOT, POLON czy ERA, przeszkoliła swych pra¬ 
cowników w Wielkiej Brytami, posiada dokumentację ser 
wisową niedostępną w naszym kraju i prowadzi serwis 
gwarancyjny mikrokomputerów na razie tylko zakupionych 
w Pewexie. 



HISTORIA ROZWOJU 

ARCHITEKTURY 

KOMPUTERÓW 


Niewątpliwie, najważniejszym mo¬ 
torem postępu jest lenistwo. Ono bo¬ 
wiem powoduje, że wymyślamy wciąż 
nowe rzeczy po to, by wykonanie ja¬ 
kiejś pracy wymagało jak najmniej 
wysiłku. Nic więc dziwnego, że z 
chwilą powstania komputerów, czło¬ 
wiek starał się obarczyć te potulne 
maszyny możliwie największą ilością 
pracy. 

Najp erw człowiekowi me spodobało się, ze procesor 
komputera (odpowedmk naszego mózgu) stoi bezczyn¬ 
nie oczekując na wykonanie operacji wprowadzenia lub 
wyprowadzeń a danych Skonstruowano więc kanały tran¬ 
smisyjne, które przejęć funkcje sterowania przepływem 
informacji Procesor m ał tylko zainicjować pracę kanału i 
mógł przystąpić do realizacji innego zadania 

Po zakończeniu transmisji, kanał wysyłał do procesora 
sygnał, po otrzymaniu ktorego, procesor przerywał swoje 
aktualne zadanie (stąd nazwa sygnału — przerwanie) i re¬ 
aktywował zadanie w którym zainicjowano zakończoną 
przed chwlą transm sję danych Dzięki takiemu systemowi 
przerwań komputer mógł realizować kilka zadań, pozornie 
jednocześnie Następny program mógł zacząć się wyko¬ 
nywać zanim poprzedn zakończył swoje działanie W kon¬ 
sekwencja każdy program czekał znacznie krócej w kolej 
ce do procesora 

Wszystkie, aktualnie wykonywane programy musiały 
być jednocześnie w pam ęci operacyjnej Zaspokojenie 
potrzeb komputera i wyposażenie go w odpowiednio dużą 
pam ęc operacyjną spowodowałoby niewspółmierne do 
efektów zwiększenie kosztow budowy komputerów 

W tym momencie ujawnił ssę kolejny motor postępu — 
skąpstwo. Człowiek chciałby osiągnąć cel płacąc za to mo¬ 
żliwie najniższą cenę Prawdopodobnie dlatego pierwszy 
człow.ek zaczął chodzić na dwóch nogach, zęby jego po¬ 
tomkowie wydawali mn ej pieniędzy na buty 

Zmniejszenie kosztow budowy komputerów osiągnięto 
początkowo wprowadzając sztuczne nakazy — żaden pro¬ 
gram nie mógł zajmować więcej mz „ileś" pamięci To 

„ileś” stanowiło więc istotny parametr jakości komputera. 

Z czasem jednak, wspomn ana wcześniej pierwsza ce¬ 
cha człowieka doszła do głosu. Lenistwo spowodowało, ze 
komputer rozwiązywał coraz bardziej złozone problemy W 
konsekwencji, rosły rozmiary programów W pewnym mo¬ 
mencie objętość pamięci operacyjnej okazała się zbyt 
mała. Jednocześnie układy pamięci były jeszcze na tyle 
kosztowne, ze rozbudowa ich me wchodziła w rachubę 
Postanowiono więc, duży program podzielić na kilka 



Jednopłytkowy koprocesor dia imb pc/ 

XT/AT i kompatybilnych wykorzystujący mikroproce¬ 
sor motoroli 68000 (lub 68010) oferuje firma Quin Sy¬ 
stems Ltd. Płyta, wkładana do pełnowymiarowego 
gniazda (slot) PC, dysponuje mocą obliczeniową mi¬ 
nikomputera 16/32-bitowego z zegarem 10 MHz i sy¬ 
stemem operacyjnym OS9 wielodostępnym i wieloza¬ 
daniowym typu UNIX (Bell Laboratories). Możliwe jest 
również zakupienie systemu operacyjnego DOS68, 
zapewniającego kompatybilność z systemem DOS 
IBM PC oraz rozbudowa pamięci 512KB do 1MB. Na 
płycie przewidziane jest również miejsce na procesor 
matematyczny 32081, wykonujący 20000 operacji 
zmiennoprzecinkowych na sekundę. 


Automatyczny tłumacz o nazwie fortrix 

firmy DATAWARE przekształca w otoczeniu UNIX/C 
pliki i programy z FORTRAN-u na język C z szybkoś¬ 
cią 600 linii na minutę. Program umożliwia również 
naukę programowania w języku C programistom zna¬ 
jącym FORTRAN. 


Wielostandardowy monitor kolorowy, 

kompatybilny z kartam CGA,EGA i PGA IBM PC ofe¬ 


mniejszych części i wykonywać je jedna po drugiej Pro¬ 
gramista został jednak obarczony dodatkowym proble¬ 
mem. Pisząc program, musiał zaprogramować rozwiązanie 

podstawowego zadania i podjąć decyzję, w jaki sposob 
podzielić program na segmenty Programista to tez czło¬ 
wiek — jest w ęc leniwy. „Chcemy zyc wygodnie i beztro¬ 
sko” — krzyknęli programiści. „Nic nas nie obchodzą pro¬ 
blemy komputera ze zmieszczeniem programu w pamięci. 
To jest jego problem mech węc on sam sobie z tym ra¬ 
dzi”. Program umieszczono w szybkodostępnej pamięci 
dyskowej a pamięć operacyjną podzielono na bloki i każ¬ 
demu dobudowano rejestr adresu Odtąd każdy blok pa- 
m ęci miał dwa adresy adres fizyczny — określający jego 
położenie w komputerze oraz adres logiczny — według 
ktorego procesor mógł w mm zapisywać lub odczytywać 
darf§ 

Jednocześnie próba odwołania sip do nieistniejącego 
adresu logicznego powodowała ze procesor otrzymywał 
sygnał przerwań a Zawieszał wtedy dz ałame aktualnego 
zadania, odnajdywał brakujący segment programu na dys¬ 
ku i po przeadresowamu jednego z blokow wprowadzał 
szukany segment do pamięci, po czym uaktywniał zada- 
nie Program wprawdzie nadal był dzielony na segmenty, 
jednak teraz odbywało się to bez udziału programisty Dłu¬ 
gość każdego segmentu była równa rozmiarów bloku pa¬ 
mięci operacyjnej Od tej chw li program mógł byc tak 
duży, jak rozległy był obszar pam ęci, który można było za¬ 
adresować na szynie adresowej niezależnie od fizycznej 
wielkości pamięci operacyjnej Tak zorganizowaną pamięć 
nazwano pamięcią wirtualną Koszt rozbudowy szyny ad¬ 
resowej, w porównaniu do kosztu rozbudowy pamięci jest 
znikomy 

2 lenistwa i chciwości wyniknęły dwa oszustwa Pierw¬ 
sze — pozornie jednoczesne wykonywan e się kilku pro¬ 
gramów drugie — pozornie olbrzymia pamięć operacyjna 

Moim zdaniem są to dwa, najpoważniejsze osiągnięcia 
w dziedzinie rozwoju architektury komputerów 

mgr Mieczysław Płacheta 



ruje firma brytyjska Reflex Ltd. Monitor może również 
współpracować z innymi mikrokomputerami z czę¬ 
stotliwością odchylania poziomego w zakresie od 15 
do 34 kHz. Po włożeniu i zainstalowaniu dowolnej z 
wymienionych kart monitor automatycznie dostoso- 
wywuje się do właściwego trybu pracy, akceptując 
sterowanie sygnałami analogowymi lub TTL. 


80C31 jest 8-bitowym mikroprocesorem wykona¬ 
nym w technologii NMOS w firmie Advanced Micro 
Device, co w stosunku do jego odpowiednika w tech¬ 
nologii NMOS pozwala na zmniejszenie poboru mocy 
o 75%. W tej samej kości znajduje się również 128KB 
pamięci RAM, 32 programowalne wejscia/wyjscia, 
dwa liczniki 16-bitowe, wbudowane przerwania z pię¬ 
ciu źródeł i dwóch poziomach, dwukierunkowa brama 
szeregowa, generator wewnętrzny i zegar. Układ wy¬ 
konany jest w 40-nożkowej obudowie typu DIL, przy¬ 
stosowanej do montażu powierzchniowego. 
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Wymyśliłem prosty program, przy pomocy któ¬ 
rego komputer sprawdza, czy dana liczba jest 
pierwsza, czy złożona. Oto on: 

10 INPUT „L=”; L 

20 IF L<2 OR L > 32767 OR L <> INT (L) THEN GOTO 10 

30 FOR N = 1 TO L 

40 LET K = L / N 

59 IF K = INT (K) AND K <> 1 AND K <> L THEN 

PRINT „LICZBA ZŁOZONA”: GOTO 80 

60 NEXTN 

70 PRINT „LICZBA PIERWSZA” 

80 STOP 

Wprawdzie program ten działa dobrze, ale przy 
większych iczbach czas oczekiwania na sprawdze¬ 
nie jest bardzo długi. Czy moglibyście zapropono¬ 
wać inny algorytm rozwiązania tego problemu? 

Jerzy R. 

(nazwisko i adres do wiad redakcji) 

Program jest faktycznie prosty, co me znaczy, ze 
użytego w mm algorytmu me można usprawnić Zau¬ 
ważmy, ze dla liczby pierwszej L algorytm wykonuje 
dokładnie L dzieleń i sprawdzeń wyniku Na pierwszy 
rzut oka widać, ze wystarczy tylko L-2 dzieleń, bo me 
musimy sprawdzać podzielności przez 1 i przez L Wy¬ 
starczy zmienić limę 30 programu na 

30 FOR N-2TO L-1 

1 nieco uproście sprawdzanie warunków w linii 50 
Przy dużych L oszczędność dwóch dzieleń me ma 
oczywiście większego znaczenia Poszukajmy zatem 
większych oszczędności Zobaczmy, ze liczba podzie¬ 
lona przez dowolne N parzyste dzieli się również przez 

2 Wystarczy zatem najpierw zbadać podzielność 
przez 2, a potem możemy juz ograniczyć się do niepa¬ 
rzystych N tzn 3,5 7,9 Modyfikacja jest prosta, a 
zmniejszy ilosc wykonywanych działań o mniej więcej 
połowę — do L/2 

Jak powiada Dennie van Tasseli „Wielu ludzi sędzi 
ze me można juz niczego poprawić, bo juz raz popra¬ 
wialiśmy”. A jednak Przyjrzyjmy się jeszcze raz liczbie 
L. Jeżeli jest ona złozona, to da się przedstawić w po¬ 
staci iloczynu 

L = N* K 

gdzie N i K sę oczywiście podzielnikami liczby L. Zoba¬ 
czmy, ze jeden z tych dwóch podzielników jest zawsze 
mniejszy będz równy pierwiastkowi z L. 

N < j/L lub K < \fl 

Łatwo to udowodnić i czytelnik z pewnoscię dokona 
tego we własnym zakresie Wniosek dla nas z tego wy¬ 
pływający jest taki, ze jeżeli liczba pos ada podzielnik 
większy od j/L to na pewno posiada podzielnik mniej¬ 
szy będz równy j/T To pozwala ograniczyć zakres 
sprawdzanych N z góry jedynie do pierwiastka z L. 
Ograniczamy zatem znów liczbę działań do wielkości 
j/172 

Zobaczymy, jaka to oszczędność dla L rzędu 
10000 wykonujemy w tym ostatnim przypadku 50 
(pięćdziesiąt!) dzieleń wobec dziesięciu tysięcy w 
pierwszej wersji programu Znów cytując van Tasseia 
„Godzina planowania warta jest pięciu godzin progra¬ 
mowania 

Oto poprawiona wersja programu 

10 INPUT „L= ’’; L 

20 IF L < 2 OR L > 32767 OR L <> INT (L) THEN 
GOTO 10 

30 LET K = L / 2 REM Sprawdzamy podzielność 
przez 2 

40 IF K=!NT{K) THEN GOTO 120 
50 LET Zakres = SQR (L) 

60 FOR N =3 TO Zakres STEP 2 

70 LET K = L / N 

80 IF K = INT (K) THEN GOTO 120 
90 NEXT N 

oa 


100 PRINT „LICZBA PIERWSZA” 

110 STOP 

120 PRINT „LICZBA ZŁOZONA” 

130 STOP 

Błędne byłoby przekonanie, ze ilości działań me da się 
jeszcze zmniejszyć Gdybyśmy np znali wszystkie li¬ 
czby pierwsze mniejsze od \f \I wystarczyłoby spraw¬ 
dzać podzielność tylko dla mch Dlatego tez algorytm 
znajdowania wszystkich hczb 4 pierwszych od 1 do L ro¬ 
związalibyśmy całkiem inaczej Prostą, acz wymagają¬ 
cą stosunkowo dużo pamięci metodą byłoby wówczas 
rowmez tzw sito Eratostenesa, który to algorytm w 
ogolę me wymaga wykonywania innych działań niż do¬ 
dawanie 

Odsyłam do literatury Niklaus Wirth „Wstęp do 
oprogramowania systematycznego", WNT 1987 oraz 
cytowanej tu publikacji Dennie van Tasseia „Praktyka 
programowania , WNT 1978 Obie ksiązk zostały wy¬ 
dane w serii BIO 


Nie mam wprawdzie własnego komputera, ale w 
szkole znajduje się ZX SPECTRUM +. Proszę o po¬ 
moc w następujących problemach: Chcę, aby pod¬ 
czas wykonywania programu pewien napis był 
cały czas widoczny. Czy można coś zrobić, aby in¬ 
strukcja CLS kasowała wszystko oprocz tego na¬ 
pisu? 

(nazwisko i adres do wiadomości redakcji) 

Szybkie kasowanie wybranych części ekranu jest 
możliwe do zrealizowania przy użyciu kodu maszyno¬ 
wego Trudno tu modyfikować systemową procedurę 
kasowania ekranu — prościej jest napisać własną Na¬ 
pisanie takiej procedury, kasującej wszystko oprócz 
wybranego „okienka” jest w ogolnym przypadku trud¬ 
ne Można zadame uproście, wykorzystując fakt po¬ 
działu pamięci ekranu na trzy bloki po 2 kilobajty (jak te 
bloki wyglądają na ekranie można zobaczyć podczas 
wczytywania obrazka z magnetofonu) Jeżeli chcemy 
skasować wybrany biok ekranu, wystarczy wyzerować 
2 kB pamięci, począwszy od adresu 
16384 — dla gornego bloku, 

18432 — dla bloku środkowego, 

20480 — d!a dolnego bloku ekranu 
Kasowania dużych obszarów pamięci najłatwiej doko¬ 
nać, stosując pewien sposobik z użyciem instrukcji 
LDIR procesora Oto on, przedstawiony schematycz 
nie 

LD (Adres), 0 
LD HL, Adres + 1 
LD DE Adres 
LD BC, Długość - 1 
LDIR 

Adres jest tu w elkoscią wyznaczającą początek kaso¬ 
wanego bloku zas Długość — ilością bajtów do wyze¬ 
rowania Podczas wykonania instrukcji LDIR zero spod 
adresu Adres zostanie skopiowane pod Adres + 1 
Następnie kopiowana jest komórka Adres + 1 do ko¬ 
mórki Adres + 2 — ale przecież przed chwilą do Adres 
+ 1 wstawione zostało zero, zatem komorka Adres + 
2 zostaje wyzerowana i tak dalej. Jak widać, cały pro¬ 
gram liczy tylko kilka bajtów Jak już wspominałem, ro¬ 
związanie bez przyjętych załozen upraszczających by¬ 
łoby znacznie bardz ej skomplikowane 


Jak zrealizować dzielenie lub mnożenie w asem¬ 
blerzei? 

Jak zrealizować przesunięcie kilku bajtów o je¬ 
den bit w lewo lub w prawo? (dotyczy procesora 
Z80 — przyp. MW). 


Na listy czytelników odpowiada 
Marcin Waligórski. 


Czy program studiów informatycznych obejmuje 
języki programowania wysokiego rzędu, czy asem¬ 
blery? 

W jaki sposób realizowane jest w grach spraw¬ 
dzenie, czy zaszło spotkanie np, bohatera z dusz¬ 
kiem itp. ? 

Bogdan Piguła 
uczeń LO im. Małachowskiego 

Płock 

Asemblery rożnych typów najczęściej udostępniają 
programiście instrukcje dodawania i odejmowania plus 
zestaw arytmetycznych operacji bitowych (np przesu¬ 
nięcia negacje) Z tego powodu realizacja działań 
mnożenia i dzielenia może byc w ogolnym przypadku 
nieco kłopotliwa Łatwo zauwazyc jedynie to, ze prze¬ 
sunięcie reprezentacji liczby o jeden bit w lewo (przy 
wstawieniu bitu 0 na pierwsze miejsce) odpowiada 
przemnożeniu I czby przez 2 Odwrotnie, przesunięcie 
w prawo — znów ze wstawieniem najstarszego bitu 0 
— odpowada dz elemu całkowitemu liczby przez 2 
Ale uwaga — powyższe reguły dotyczą arytmetyki bez 
znaku Dla arytmetyk ze znakiem trzeba dodatkowo 
dbać o zachowanie najstarszego bitu który jest właś¬ 
nie bitem znaku Najczęściej procesor może wykony¬ 
wać dwa rodzaje przesunięć arytmetyczne i logiczne, 
odpowiadające tym dwom sytuacjom 
Podprogram mnożenia liczb można utworzyć, wyko¬ 
rzystując właśnie przesunięcia i dodawanie Podobnie 
rzecz ma się z dzieleniem 

Prościej jednak sięgnąć do gotowych procedur aryt¬ 
metycznych, umieszczonych w systemie operacyjnym 
komputera Większość systemów operacyjnych jest 
wyposażona właśnie w tzw arytmetykę systemową, 
stanowiącą właśnie zbiór procedur obliczających me 
tylko np iloczyn i iloraz, lecz także inne funkcje — 
choćby pierwiastek kwadratowy Sub sinus 
Przesunięcia całych grup bajtów (niezbędne przy re¬ 
alizacji dz ałan na liczbach podwyższonej precyzji) naj¬ 
częściej można dokonać przy użyciu wskaźnika (bitu) 
C-Carry procesora Przy wykonywaniu przesunięcia 
pewnego bajtu, bit „gubiony — najstarszy przy prze¬ 
sunięć u w lewo i najmłodszy przy przesunięciu w pra¬ 
wo — zostaje skopiowany do C Podczas przesuwania 
następnego bajtu możemy C wstawić z powrotem — z 
tym, ze na nowym juz miejscu Procesor Z 80 posiada 
zresztą w zestawie instrukcji przesunięcia ze wstawie¬ 
niem Carry — są to instrukcje RLA i RRA oraz RL i RR 
Jako przykład programu studiów wyższych na kieru¬ 
nku informatyka mogę podać program Informatyki UW 
Obejmuje on kilka języków programowania wyższego 
rzędu (jak na razie z PASCAL em na pierwszym miejs¬ 
cu) oraz jedną całoroczną pracownię programowania w 
asemblerze Warto jednak zauważyć, że główny nacisk 
program ow kładzie na poznanie informatycznych me¬ 
tod rozwiązywania problemów i tworzenia oprogramo¬ 
wania a me na poznawanie coraz to nowych języków 
Sprawdzania kolizji obiektów na ekranie najczęściej 
dokonuje się po prostu przez porównanie ich współ¬ 
rzędnych lub obliczenie wzajemnej odległości. Oba 
podejścia wymagają pamiętania w każdym momencie 
współrzędnych wszystkich ob ektow Nie muszą to być 
współrzędne ekranowe, ale np miejsca obiektów w 
pewnei tablicy, odwzorowującej ekran 
W niektórych mikrokomputerach (np Atari XL) koliz¬ 
je obiektów są sygnalizowane przez procesor graficz¬ 
ny Oczywiście znakomicie ułatwia to pracę programiś¬ 
cie. 
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Proszę o wymienienie tytułów symulatorów lotu 
myśliwcem na ZX Spectrum. 

(nazwisko i adres do wiadomości redakcji) 

W tej chwili najlepszym — i chyba jedynym dobrym 
— programem tego typu na Spectrum jest „Fighter Pi¬ 
lot", ktorego autorzy powołują się na pierwowzór w po¬ 
staci samologu F-15 Eagle. Ze względu na kiepską 
grafikę Spectrum symulatorowi temu daleko jeszcze 
do doskonałości Osobiście uważam ze w ęcej satys¬ 
fakcji daje nocny lot Lancasterem w grze „Dambu- 
sters”, choc to śmigłowy samolot bombowy, zaś pro¬ 
gram nie ma pretensji do nazwy „symulator 

Marcin 


Od niedawna używam kompilatora PASCAL-a 
firmy Hisoft HP4T1.6M na komputerze ZX Spec¬ 
trum 48K. Kompilator ten w instrukcji READ nie 
przyjmuje danych typu CHAR, chociaż program 
nie wykazuje błędów. Zgodne jest to z uwagą 
p. Marka Wyrwidęba zamieszczoną w artykule z nr- 
u 12/86. Rozwiązać ten problem można za pomocą 
zdefiniowania dwóch procedur: 


PROCEDURĘ WPISZ; 

BEGIN 

ZNAK := INCH 

WHILE (ZNAK CHR (32)) OR (ZNAK > CHR (127)) 

DO 

ZNAK := INCH 
END; 

PROCEDURĘ PAUSE, 

VAR I: 1 5000; 

BEGIN 

FOR I : = 1 TO 5000 DO 

BEGIN 

END 

END 

Funkcja INCH działa analogicznie jak INKEY$ w 
Basic u, tzn. jej wartością jest znak reprezentowa¬ 
ny przez ostatnio wciśnięty klawisz. Oczywiście w 
programie bezpośrednio przed procedurą WPISZ 
należy umieścić procedurę PAUSE. 

Mam jednak pewne wątpliwości co do mojego spo¬ 
strzeżenia dotyczącego procedury READ. Wątpli¬ 
wości te powoduje wypowiedz p. Kuryłow cza w 
książce „Przewodnik po ZX Spectrum”, s. 213 Cy¬ 
tuję: 


„...próba wczytania liczby lub łańcucha znaków 
spowoduje błąd. Dlatego pierwszą instrukcją czy¬ 
tania powinno byc READLN”. 

Pan Kuryłowicz optśuje kompilator HP4T1.4, czyli 
poprzednią wersję HP4T1.6M. 

Jeżeli p. Markowi Wyrwidębowi wiadomo coś 
bliższego na ten temat, prosiłbym w miarę możli¬ 
wości o odpowiedz. 

Marek Sitnicki 
ul. Bratysławska 5a m 75 
94-032 Łódź 

Oto odpowiedź autora „Wstępu do programowania 
w języku PASCAL” opublikowanego w nr ach 10/86— 
1/87 „Bajtka": „ Wstęp do programowma w PASCAL~u 
— jako ze był tylko wstępem — nie zawarł w ogolę opi¬ 
su standardowej procedury READLN Jej wywołanie 
powoduie „przejście z czytaniem do nowej linii” — 
analogicznie jak w parze WRITE i WRITELN Dosłownie 
oznacza to pominięcie wszystkich znaków z wejścia az 
do napotkania znaku końca (CHR(13)), a następnie do¬ 
datkowo pominięcie tego znaku, aby następny wczyta¬ 
ny znak był pierwszym znakiem nowej linii, w PAS- 
CAL-u Hisoft, nie wn kając w szczegóły implementa¬ 
cyjne, możemy akcję taką interpretować jako opróżnie¬ 
nie bufora wejściowego, zawierającego ostatnio wczy¬ 
taną limę Po wywołaniu READLN następna instrukcja 
READ spowoduje ponowne wypełnienie bufora wejścia 
tym co użytkownik wypisze na klawiaturze, a następ 
me odczytanie z bufora potrzebnych danych 
Jak w dać, sam proces czytan a wykorzystuje dane 
zawarte w buforze, a nie pobiera ich na bieżąco z kla¬ 
wiatury Kłopot w posiadanej przez Pana wersji języka 
jest taki, ze zaraz po uruchomieniu bufor wejściowy za- 
w era limę pustą — zatem tylko znak CHR (13) I roba 
czytania tego znaku to oczywiście odczytanie znaku 
„karetki” i mc więcej — zatem błędu nie ma, są tylko 
wczytane błędne dane 

Użycie READLN przed READ rozwiązuje problem 
Proszę zauważyć, ze takich kłopotow me ma, gdy 
wczytujemy liczby — wtedy PASCAL automatycznie 
pomija wszystkie znaki me będące cyframi, +, - lub E 
Pański program stanowi ominięcie naszego proble¬ 
mu — po prostu zrezygnował Pan z usług bufora i zajął 
się czytaniem bezpośrednio z klawiatury 
Na zakończenie tych kslku uwag pragnę zauwazyc, 
ze operacje wejscia/wyjscia są tym miejscem gdzie 
najczęściej implementacja rożni się od raportu języka 
Jest to tez potencjalne miejsce rozmc między rożnymi 
kompilatorami 

r Z poważaniem 

Marek Wyrwidąb 


Pan M. Kop w swym liście („Bajtek” 2/87) poma¬ 
wia Studio „Jacke” o rozbój, zapewne w trosce o 
swe bezpieczeństwo nie ujawniając adresu. 

Zabieram głos nie tyle w obronie własnej czci, co 
dla podyskutowania o szerszym problemie ukaza¬ 
nych w liście p. M. Kop postaw moralnych a wycho¬ 
wawczych oraz sposobu pojmowania zasad działa¬ 
nia rynku oprogramowania i literatury komputero¬ 
wej. 

Pan R/l. Kop pisze: „syn jest stałym bywalcem gieł¬ 
dy”. Bywalcem czy handlarzem? „Giełda jest wspa 
niałym rozwiązaniem chroniącym moją kieszeń”. 
Dziękują za odpowiedź. A może pociecha zamiast na 
giełdzie pracować na ojca zajęłaby się własną nauką 
lub pracą, zwłaszcza że na giełdach ponoć biją? 

Co jednak dziecku przeszkadza zarabiać na papu? 
Drobnostka: z braku własnego dorobku ma ono do 
sprzedania jedynie cudzy, trzeba więc okradanym 
zabronić chronienia swych praw. 

Pan Kop proponuje, a Bajtek bez zastrzeżeń pro¬ 
paguje podwójną moralność: okraść Kalego (swo¬ 
ich zle, okraść obcych — dobrze. Jedyny problem 
w tym, że okradani coraz gorzej pracują i poziom ich 
opracowań „woła o pomstę do nieba”. 

Właśnie by zaj^ewnić wysoki poziom literatury, in¬ 
strukcji oraz — zazwyczaj niezwykle pracochłon¬ 
nych — adaptacji oprogramowania nieliczne prywat¬ 
ne firmy (m.in. „Pro-lnfo” i „Studio Jacke') zatrud¬ 
niają czołowych polskich informatyków, populary¬ 
zatorów, płacąc im za wysokiej jakości i w expreso- 
wych terminach wykonywaną pracę kwoty przekra¬ 
czające nieraz milion za pojedynczy tytuł, dzięki cze¬ 
mu podstawowe informacje techniczne o najno¬ 
wszych światowych osiągnięciach z zakresu kon¬ 
strukcji sprzętu I oprogramowania dostępne są za¬ 
równo na poziomie profesjonalnym, jak i popular¬ 
nym nie po 5 łatach, jak w księgarniach, a po 2—3 
miesiącach. Korzysta na tym cała gospodarka o kul¬ 
tura narodowa. 

Aby ponoszenie tych nakładów było możliwe pra¬ 
ce te trzeba następnie sprzedać w dostatecznej iloś¬ 
ci i niestety po odpowiedniej cenie (choć i tak znacz¬ 
nie niższej niż życzą sobie za podobne opracowania 
nasze instytuty naukowe). Pan Kop woli zbierać nie 
siejąc i uważa, że jedyne liczące się koszty to koszty 
kserografu, na którym jego syn powiela nielegalnie 
cudze prace. 

W ciągu minionych lat zamówiłem i wydałem wiele 
podręczników i programów cieszących się uzna¬ 
niem użytkowników Atari, Commodore, Amstrada, a 
ostatnio IBM, np. całkowicie oryginalne podręczniki 
do polskiej wersji Framework II (cztery tomy), GW 
Basic (dwa tomy), programów Drukarz (Lettrix), Si- 
dekick, Turbo-Pascal, Smartwork, MSWord, Turbo- 
Prolog, Chwriter autorstwa m.in. R. Wacławka, J. Or- 
kiszewskiego, W. Majewskiego, L. Rudaka i innych. 

Janusz Gołuch 


Studio „Jacke ’ 





Studio komputerowe 

„CANON” 

proponuje bogatą ofertę dotyczącą 
COMMODORE 16, 116, 4 PLUS Koper¬ 
ta zwrotna Chorzow, 41-506, ul. Karło¬ 
wicza 23/12. 
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BIURO USŁUG KOMPUTEROWYCH 

BONUS 

• PROGRAMY 

• LITERATURA 

— ATARI 800 XL/65.130 XE/520 ST 

— AMSTRAD 464, 664, 6128 

— ZX SPECTRUM 

— COMMODORE 

— IBM — opracowania literaturowe 
04-111 Warszawa 

ul Grochowska 207 
tel. 100-061 wewn. 244 
wgodz 16 00—19 00 

— rachunki dla instytucji 

— informacje po nadesłaniu koperty 
zwrotnej. 

D 96 



PRZEDSIĘBIORSTWO 
HANDLU ARTYKUŁAMI 
WYPOSAŻENIA 
MIESZKAŃ W ŁODZI 

PROWADZI SPRZEDAŻ: 

MIKROKOMPUTERÓW 

oraz sprzętu 

KOMPLEMENTARNEGO 

I dla odbiorców indywidualnych i pozarynko- 
wych — w sklepach w Łodzi 
— ul. Piotrkowska 91 tel. 32-20-65 
— ul. Dzierżyńskiego 32a 

ZAPRASZAMY 
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MERFi- 


LZmE 


ZAKŁADY URZĄDZEŃ KOMPUTEROWYCH 



41-813 Zabrze, Kruczkowskiego 39 
telex 036711 telefon 72-20-21 do 29 


Oferują do sprzedaży mikrokomputer 


COMPAN 8/16 


Z NATYCHMIASTOWĄ DOSTAWĄ 

COMPAN 8/16 to: 


• duża pamięć operacyjna, 

w tym RAM DYSK o pojemności 448 kB 

• pamięć masowa na dyskach elastycznych 
5.25” 2x720 kB i/lub na dysku twardym 
typu WINCHESTER o pojemności 22 MB 

• grafika o dużej rozdzielności 288x640 

• klawiatura z klawiszami programowalnymi 
w układzie zgodnym z mikrokomputerami 
XT 

• możliwość pracy w wielodostępie 

• konkurencyjne ceny w złotówkach 


SKORZYSTAJ Z OKAZJI!!! 

NA ŻYCZENIE WYSYŁAMY AKTUALNĄ OFERTĘ. 


k-128 


PROGRAMY DO C 64/128 
ATARI ST, AMIGA, IBM, PCW 
Sławomir Krysztofowicz, ul. 
Iwaszkiewisza 1/71,42-200 
Częstochowa. 


G-19 


ASTRO-KOMPUTER STUDIO 
PROGRAMY 

• ATARI • SHARP MZ-700, 800 • 
ZX SPEKTRUM 
w sprzedaży wysyłkowej 
54-515 WROCŁAW, 
ul. GDACJUSZA 39 

G 58 


ZX SPECTRUM — programy — wy¬ 
miana 

Andtarr Hofman u! I Armi W P 4 m 41, 
43-300 Bielsko-Biała 

G 59 



ENTER 


computing 


Autor: 

M. BORKOWSKI 


pierwsza polska pełnowymiarowa 
graficzno-tekstowa gra typu adven- 
tura dla ZX SPECTRUM 
zadaniem grającego — odnaleźć i 
unieszkodliwić system atomowego 
zagrożenia. 


ENTER-COMPUTING 02-105 WARSZAWA P-3 
INF. PO NADESŁANIU KOPERTY ZWROTNEJ 


MD HONG KONG 


KOMPUTERY 


PC-1011 (komp PC/XT).US $ 690,- 

PC-1021 (komp PC/AT).US $ 1499,- 

plus 20 MB HDD i inne liczne opcje 

§ ceny z dostawą do Polski 
• roczną gwarancją i serwis w Polsce 

Szczegółowe informacje, cenniki itp do uzyskania w 
biurze sprzedaży EMD w Wiedniu: 

EMD (HK) Warenhandelsges. m.b.H. 

Postfach 214 
A-l 041 Wien, Austria. 


K95 


Wojewódzkie Przedsiębiorstwo Handlu 
Wewnętrznego 
Oddział w Tychach 


jj 


YIDEOBIT 


JJ 


43-100 TYCHY, ul. Al. ZMP 77, tel. 27-69-75 

PROWADZI 
SKUP — SPRZEDAŻ 


— mikrokomputerów 

— urządzeń peryferyjnych 

— oprogramowania 

— sprzętu magnetowidowego 
Zapewniamy o atrakcyjnych cenach 
Sklep prowadzi sprzedaż pozarynkową. 
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COMPUTRONIX 


PSS SPOŁEM 


Kraków, Garnearska 21 
oferuje 

■ sprzęt komputerowy 
wraz z peryferiami 

SKLEP WYDAJE RACHUNKI. 


K-110 


INTERFEJS CRI 


wykonywany na zamówienie przez firmę IBS- 
elektromc umożliwia współpracę zwykłego ma¬ 
gnetofonu z komputerem ATARI zapis, odczyt, 
start-stop magnetofonu gwarancja 


Warszawa, tel. 34-16-06 w g. 10.00—14.00. 
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INDYWIDUALNY 

BANK 


DANYCH 


Nazywam się Waldemar Stos Jestem studentem me 
dycyny, mam 21 lat Posiadam mikrokomputer Commodo 
re VIC 20 Oprogramowanie gry zaczerpnięte z czaso¬ 
pism o Commodore i z oryginalnych książek zawierają¬ 
cych programy na ten mikrokomputer; programy firmowe- 
Sargon II, Road Race, Alpha Alarm. Interesuję się muzyką 
uprawianiem takich sportów, jak tenis ziemny i wycieczki 
rowerowe Proponuję wymianę software*u, oferuję sporo 
gier rozrywkowych i programów muzycznych Moj adres 
ul Obroncow Stalingradu 1,32-800 Brzesko, wo tarnow 
skie. 

Klaudiusz Urbański uczeń 12 lat M krokomputer Atari 
130XE i magnetofon Oprogramowanie: użytkowe i gry. 
Proponuję wymianę informacji na temat użytkowania Atari 
130XE oraz programów Zainteresowania elektronika 
muzyka. Adres: ul Batorego 38 m. 23, 05-400 Otwock 

Michał Malordy uczeń, 14 lat. Mikrokomputer ZX 

Spectrum + oraz magnetofon Oprogramowanie progra 
my użytkowe, graficzne, gry, podstawowe elementy BASI- 
Ca Zainteresowania elektronika, informatyka, filatelisty¬ 
ka Adres ul Bytomska 13, 41-600 Świętochłowice 

Ryszard Krakowiak, programista, 40 lat Mikrokompu¬ 
ter Sharp MZ 731 z drukarką Oprogramowanie: edytor 
tekstu, kartoteka, adresy, biorytmy, kompilator BASIC, 
kompilator PASCAL-a, Assembler, szachy oraz gry w wer¬ 
sji polskiej Zainteresowania — astrologia Adres: 
ul. Gdacjusza 39, 54-515 Wrocław. 

Artur Chromy uczeń, 16 lat. Mikrokomputer Commo¬ 
dore 116 z magnetofonem. Oprogramowanie: programy 

graficzne, muzyczne, Turbocopy, firmowe szachy, brydż, 
Wizard, Major Biink i inne gry Zainteresowania- fizyka 

matematyka, elektronika Proponuję wymianę literatury, 
własnych rozwiązań oraz g er. Adres Czyżyńska 2/1,31- 
571 Kraków Szczególnie zaiezy mi na kontakcie z „mikro- 
komputerowcam:” z Krakowa ponieważ jestem mepeł 
nosprawny 

Edyta Malec, uczennca, 16 lat Mikrokomputer Meri¬ 
tum I Software — głównie gry Zainteresowania geografia, 
piłka nożna Oczekuję wymiany gier Adres ul Wronia 7/5, 
59 300 Lubin, woj. legnickie. 

Krzysztof Przyłucki, uczeń, 17 lat Mikrokomputer ZX 
Spectrum 128 oraz magnetofon firmowy Dicsons Opro¬ 
gramowanie edukacyjne — kombinatoryka, wyznaczniki, 
demonstracyjne — książka telefoniczna i bank adresów 
gry, ilustracja prawa w elkich liczb Bernoulliego, programy 
kopiujące, translatory — Pol/Logo, Beta- Basic Zaintere¬ 
sowania matematyka, psychologia, język: obce Proponu¬ 
ję wymanę oprogramowania i doświadczeń Adres Gawli- 
k Wielkie 30, 11-510 Wydminy 

Rafał Konopacki, uczeń Mikrokomputer MSX Sony HIT 
BIT Z powodu nietypowości mojego mikrokomputera pil 
me poszukuję oprogramowania i literatury na jego temat 
Adres ul. Łączności 6a/2, 53-330 Wrocław 

Radosław Szatkowski, uczeń, 13 lat Mikrokomputer 
Amstrad CPC 464 Oprogramowan e programy edukacyj¬ 
ne, graficzne, obliczanie pola koła, obliczanie gęstości 
masy, plan lekcji Chciałbym naw ązac kontakt z posiada¬ 
czami tego typu komputera celem wymiany doświadczeń, 
programów i literatury. Adres: ul. Gwardii Ludowej 4b/8 
26 200 Końskie 

Jerzy Wiśniewski, chemik, 37 lat Mikrokomputer Atar 
800XL Oprogramowanie gry i kilka programów użytko¬ 
wych (Logo, Assembler, Translator). Proponuję nawiąza¬ 
nie kontaktu w celu wymiany programów i współpracy w 
zakresie programowania. Adres: ul. Śląska 15/2 85-235 
Bydgoszcz 

Przymysław Lewkonowicz student, 20 lat Mikrokom¬ 
puter Oric-1 Oprogramowanie obliczanie wytrzymałości 

belek zginanych, nauka alfabetu Morse a, program de¬ 
monstracyjny Oric Software Zainteresowania elektronika, 

informatyka Adres ul Bratnia 1,56-400 Oleśnica SI 

Tomasz Wiese, uczeń, 15 lat Mikrokomputer Atari 

65XE i magnetofon XC-12. Oprogramowanie firmowe (gry 
programy użytkowe i edukacyjne) Zainteresowania, mate¬ 
matyka, fizyka, elektronika, muzyka. Wymiana oprogramo¬ 
wania i literatury Adres ul. II Armii WP 17, 64 610 Rogoź¬ 
no Wlkp 


KLUB MIKROKOMPUTEROWY 

C.K. ATARI 



Klub CKM ATARI przy choszczenskim Domu Kultury 
powstał na początku 1986 r Obecnie dysponujemy 3 klu¬ 
bowymi komputerami ATARI 800 XL z firmowymi magne¬ 
tofonami ponadto stacją dysków ATARI 1050 i drukarką 

ATARI czyli systemem mikrokomputerowym Jesteśmy w 

posiadaniu ok. 200 programów na mikrokomputer ATARI 
Wymieniony sprzęt został zakupiony przez choszczenski 
Dom Kultury, a także z dotacj min ds. Młodzieży tow 
Aleksandra Kwaśniewskiego, który wizytował Klub i jego 
działalność w 1986 r 
Zasady działania klubu 

Klub mikrokomputerowy C.K M ATARI postawił sobie za 
zadane: 

— programowanie w edzy ogólnej o zastosowaniach mi¬ 
krokomputerów i systemów mikrokomputerowych 

— skupienie tych, którzy wykazali szczególne zaintereso¬ 
wanie tematem 

— indywidualnym posiadaczom mikrokomputera ATARI 
służymy pomocą, 

— członkiem klubu może zostać każdy, kto aktywnie 

uczestniczy w działalności klubu 

— wszystkie publikacje i programy będące w posiadaniu 
klubu i jego członków są udostępniane bezpłatnie. 

Klub i jego działalność 

Klub prowadź działalność w kierunkach 

1. Propagowanie ogolnej wiedzy mikrokomputerowej w 
społeczeństwie 

2. Pokazy konkretnych zastosowań techniki mikrokompu¬ 
terowej 

3 Działalność wewnątrz klubową polegającą na 

— przyswojeniu umiejętności obsługi, wykorzystania i za¬ 
stosowań systemów mikrokomputerowych jak i progra¬ 
mów użytkowych i narzędziowych napisanych przez pro¬ 
fesjonalistów 

— samodzielne programowanie i praca ze sprzętem 

W naszym regionie jesteśmy miejscem spotkań dla fa¬ 
nów z okolicznych miejscowości takich jak Barlinek, Star¬ 
gard Szczec nski, Gorzow i innych W naszym klubie po¬ 
wstało kilka programów użytkowych m in. adresowa baza 
danych, kosztorys robot malarsko-budowlanych, obliczają¬ 
cy zużycie materiałów, roboczogodziny i koszt całkowity 
prac, oraz program obliczający ceny uśrednione. Pomocą 
służy nam klub ATARI ze Szczecina liczący ok 200 człon¬ 
ków 

— Zamierzenia i plany na rok 1987 

Kontynuacja realizowanego planu. Zakupie dalsze mi¬ 
krokomputery, ponieważ tłok nie sprzyja pracy, napisanie 
skryptu dla początkujących, podejmowanie działań w kie¬ 
runku zwalczania zjaw sk patologicznych poprzez rozbu¬ 
dzanie zainteresowań i zagospodarowywanie czasu wol¬ 
nego. 

Dyrektor 
mgr Jan Kiela 


„SHARP NA START! 

Klub Użytkowników Komputerów Osobistych „MIKRO- 
KOMP’ w Łodzi, działający w ramach Ogólnopolskiej Fe¬ 
deracji Klubów Komputerowych przy Radzie Naczelnej 
Zrzeszenia Studentów Polskich informuje, ze w dniach 
17—18 października 1987 r. w Łodzi odbędzie się I Zjazd 
Użytkowników Komputerów „SHARP 
Miejsce Zjazdu Dzielnicowy Dom Kultury Łodz-Polesie, 
ul. 1 Maja 87 Celem Zjazdu jest konsolidacja środowiska, 
wymiana informacji i doświadczeń, przedstawienie włas¬ 
nych osiągnięć członków sekcji SHARP, popularyzacja no¬ 
wych rozwiązań sprzętowych i programowych. W progra¬ 
mie — wykłady i referaty dotyczące użytkowania kompute¬ 
ra SHARP MZ 

Do wzięcia udziału w Zjeźdź e zapraszamy również uży¬ 
tkowników nietypowych komputerów z mikroprocesorem 
Z 80, gdyż ch tez powinna zainteresować tematyka poru¬ 
szanych zagadnień. 

Istniejąca od 1985 r., jedyna w kraju sekcja użytkowników 
SHARP a, oraz również jedyna w kraju sekcja użytkowni¬ 
ków komputerów nietypowych z procesorem Z 80 działa¬ 
jące w ramach naszego Klubu, zrzeszają w swych szere¬ 
gach posiadaczy takich komputerów z terenu całej Polski 
Informacje na temat Zjazdu można uzyskać w Biurze Or¬ 
ganizatora; DDK Łódz-Polesie ul* 1 Maja 87, tel. 33-08- 
02 lub bezpośrednio u osób koordynujących przygotowa¬ 
nia do Zjazdu V-ce prezes Klubu, szef sekcji SHARP — 
GARLICKI JERZY ul A Struga 4 tel 32-57-83 
V-ce prezes Klubu, szef sekcji NIETYPOWYCH — 
ZYŁŁA ROMUALD ul Zachodnia 12, tel 57-75-06 

FANCOMCLUB AMIGA 

Wszystkich posiadaczy oraz użytkowników komputerów 
AMIGA zaprasza do współpracy nowo powstały korespon¬ 
dencyjny „Faneomclub AMIGA w Poznaniu Przypusz¬ 
czalnie w kraju jest jeszcze niewielka ilosc tych wspania¬ 
łych komputerów i do tego znajdują się one w rożnych 
odległych od siebie miastach Dlatego tez celowym jest 
skupienie „amigowców” w jedną (na razie nieformalną) 
grupę w celu szerszej i sprawniejszej wymiany dośw ad- 
czeń, programów i literatury Klub nasz chciałby pełnić rolę 
konsolidującą i pośredniczącą, a w dalszych zamierze¬ 
niach stworzyć sieć modemową łączącą członków klubu 

Korespondencję wraz z informacją o sprzęcie (wersja 
DOS-u RAM, peryferia), dane personalne, oraz wszelkie 
uwagi i propozycje proszę kierować na adres 
61 688 POZNAN 
O Przyjaźni 14/153 
Marek Frąckowiak 
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Macie młodsze rodzeństwo? 
Jeśli nawet nie macie, to pew¬ 
nie znajdziecie wśród swoich 
kolegów takich, którzy rozpo¬ 
czynają naukę liczenia. Właśnie 
dla nich przeznaczony jest ten 
program. 

Czytaliście zapewne w ele razy — me tylko w 
, Bajtku” — o programach dydaktycznych Bywają 
one bardzo rozmaite, ale mają jedną wspólną ce¬ 
chę — korzystając z nich, czegoś s ę uczymy A je¬ 
śli w dodatku program jest zabawny, to tym lepiej 
Nasz program będzie służył do ćwiczenia się w 
umiejętności liczenia, konkretnie odejmowania na 
poziomie przedszkolaków (tych prawdziwych, a me 
komputerowych). Myślę, ze jest on nawet trochę 
zabawny 

Czy można zwazyc liczbę 9 Chyba raczej nie 
bardzo, bo czy ktoś miał w ręce np siódemkę albo 
dziewiątkę Jak więc takie cos położyć na wadze 9 
Pofantazjujmy jeśli by s ę jednak dało wazyc licz¬ 
by, to dziewiątka powinna byc cięzsza od siódemki, 
a dwie dwójki powinny mieć ciężar jednej czwórki. 
Jeśli od ósemki odejmiemy piątkę to różnica po¬ 
winna m ec wagę trojki. Śmieszne ale . logiczne 
Prawda? 

Taki właśnie niecodzienny pomysł został wyko¬ 
rzystany w naszym programie Najpierw kompute r 
losuje dw e liczby (zwróccse uwagę na to, że druga 
liczba musi byc mniejsza od pierwszej) a następnie 
zadaje pytanie W zależności od tego, czy odpo¬ 
wiedź jest praw dłowa komputer przechodzi do wy¬ 


konań a odpowiedniego podprogramu rysującego 
wagę Na jednej z jej szalek znajduje się zadane do 
rozw ązama wyrażenie, na drugiej podana odpo¬ 
wiedz Jeśli jest ona prawidłowa, waga pozostaje w 
równowadze, jeśli podana liczba jest zbyt duża 
waga przechyla się na jej stronę, jesh jest zbyt 
mała, szalka z odpowiedzią unosi się do góry 
Popatrzcie w jaki prosty sposob skonstruowane 
zostały podprogramy rysujące wagę Jedynym pro¬ 
blemem mogą tu byc linie, w których obok znaków 
są wyświetlane na ekranie wartości zmiennych W 
tym przypadku było to proste, gdyż wszystk e licz¬ 
by, których używamy mieszczą się w zakresie od 1 
do 9, a więc są jednocyfrowe Jeżeli zdecydujecie 
się przerabiać ten program i stosować inne działa¬ 
nia arytmetyczne, staniecie przed problemem jak 
wpisać liczby o rożnej długości w taki sposob, by 
nse wpływało to na ustawienie znaków za liczbą 
Można to zrobić na bardzo wiele sposobow Naj¬ 
prostszym jest użycie rozkazu TAB, który ustawia 
kursor na zadanym miejscu Możemy również uzyc 
specyficznych dla danego komputera rozkazów 
urn eszczających kursor w dowolnej pozycji ekra¬ 
nu Dla Spectrum jest to AT, dla Atari — POSI- 
TION dla Amstrada — LOCATE W Commodore 
możemy skorzystać ze znaczków sterujących kur¬ 
sorem spod rozkazu PRINT 

Spróbujcie więc rozwinąć ten program temat 
jest wdz ęczny, bo praktycznie nie stawa żadnych 
ograniczeń. Możecie dopisać procedury dźwięko¬ 
we ulepszyć grafikę wzbogacać komentarze i co 
tylko przyjdzie wam do głowy. Potraktujcie to jako 
zadanie domowe 
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ATARI 800 XL 
1 DIU IMIEK15) 
i00 PRINT CHE*U25): 

170 LEI A=INTiF:NDiO}*7+3) 
180 LEI B=INI(RND(O)16+1) 
200 PRINT CHE*(125): 

240 PRINT CHE*(125); 

320 PRINT CHE*i 125): 

COHH0D0RE o4. Vl 20 
100 PRINT CHF!il47): 

200 PRINT CHE*(147); 

240 PRINT CHR*(i47): 


-•iU 

FfilNT 

CHRJU47;; 



SFECTRUM 

170 

j r t 

LŁI 

a=INT(FNDJ7+3) 

1B0 

LET 

b=INT (F.NDłBtl) 



MERITUM 

170 

LET 

a=INT<PND«0)17+3) 

180 

LET 

b=INT(RND(0)ł8+l) 


100 CL8 




110 L 

ocena 

=5 



120 f 

FINT ! Dz 

len aodrv. Jak ma 

sz na mie 3 

130 INFiJT im 

e* 



140 r 

FINT Zooaczyiiiy czv znasz 

matemat 

«e "{lmłeł:", 3 

150 

FOR i=l 

TO 5000:NEXT t 



160 

FOR n=ł 

TO 10 



170 

lE" a=INT(RND(1)17+3) 



180 

llT b = INT\END(iJ18+1} 



190 

IF c,=a 

THEN GOTO 130 



200 

3l3 
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FRINT a 

« i li i 



220 

INFUT c 




230 

FOR t=l 

TO 1000:NEXT t 



240 

CLS 




250 

IF c=a- 

b THEN B0SUB 1000 



260 

IF c)a- 

b THEN 60SUB 2000 



270 

IF c<a- 

b THEN GDSUB 3000 



280 

FOR t=l 

TO 5000:NEXT t 



290 

IF cOa 

-b THEN LET ocena 

=ocena-0 

.5:GOTO 200 

300 

NEXT n 




310 IF ocena< 

2 THEN LET ocena= 

n 

L 


y n x. r 

JiO L 

ts 




330 FRINT 'Ufluesz matenatvke na";ocena 

umie*; “. 8 

340 END 
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Ti 
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ii 
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FRINT 
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n 
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FRINT !I 
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ii 

1150 

FRINT " 



H 

1160 

FRINT " 



H 

1170 

FRINT ” 

Bardzo dobrze 7 
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II 

1180 

RETURN 
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FRINT 3 
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FRINT " 
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n 
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FRINT 3 
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FRINT n 
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FRINT ■ 
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FRINT 7 
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FRINT H! 
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i 

1) 
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FRINT ■= 
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FRINT " 
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FRINT n 
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H 
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FRINT n 
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1! 

2130 
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i 

u 
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FRINT " 
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2150 

FRINT 8 



ii 
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FRINT H 



ii 
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FRINT 8 
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n 

2180 

RETURN 
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FRINT 8 
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FRINT 3 
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n 
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FRINT 7 

\ X 


H 
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FRINT "= 



•i 

3160 

FRINT 3 



H 

3170 

FRINT 8 

Błąd "simie*:“! 

Za stało. 

H 

3180 

RETURN 
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SAM PROGRAMUJĘ 


POGADUSZKA 


Robert Witt z Gdańska przysłał do 
rubryki „Sam programuję” program 
dydaktyczny „Pogaduszka”. Robert 
wykorzystał elementy „Rozmówki” 
publikowanej w jednym z zeszłorocz¬ 
nych numerów „Bajtka”, uzupełnił 
własnymi pomysłami i w efekcie po¬ 
wstała bardzo ciekawa i kształcąca 
zabawa. Program został napisany na 
mikrokomputerze Amstrad, myślę je¬ 
dnak, że użytkownicy innych kompu¬ 
terów nie będą mieli trudności z jego 
przeróbką. 

Z pewnością Robert me będzie miał nic przeciwko 
temu, ze podzielę się z nim i innymi czytelnikami kilko¬ 
ma uwagami na temat jego pracy Zacznijmy od linii 
numer 40 

Instrukcja BORDER 0 ustawia kolor ramki, nato- 
miast INK 0,0 kolor tła Jeśli definiujemy te dwa para¬ 
metry, warto zdefiniować również kolor napisów np 

INK 1,26:PEN 1. 

Lima 60 jest najzupełniej zbędna Program będzie 
działał dokładnie tak samo gdy ją usuniemy Warunki 
umieszczone w liniach 60 i 70 dopełniają się wzajem¬ 
nie, a więc jeden z nich można pominąć 

W limach 120, 125 i 126 po instrukcjach warunko¬ 
wych powtarzają się te same rozkazy skoku do linii 
140, Ten sam efekt można otrzymać w jednej linii pro¬ 
gramowej używając operatorów logicznych 

IF l>80 or 1<2 THEN GOTO 140 
Wpisałem warunek 1<2 ponieważ w przypadku poda¬ 
nia wieku rownego 1, w linii 130 komputer komunikuje 
, Hmm wyglądasz najwyżej na 0 lat 1 ", co me jest zbyt 
sensowne 


Na początku programu komputer rozpoznaje czy 

rozmawia z dziewczyną, czy z chłopakiem później jed¬ 
nak używa wyłącznie rodzaju męskiego Spróbujcie to 
zmienić, jeżeli będz ecie mie i trudności, wróćcie do 
programu , Rozmówka 

Linię 180 można zastąpić prostym skokiem 

GOTO 200 

gdyż skoro komputer przeszedł przez linie 160 i 170, 
to w adomo ze p$ nie jest równe ani „tak , ani „me 

Zadaniem instrukcji warunkowych w limach 230 i 
240 jest zakwalifikowanie grającego do odpowiedniej 
grupy wiekowej Jest tu pewna mescisłosc Autor bie¬ 
rze pod uwagę tych, którzy mają więcej niz szesc i 
mniej mz dziesięć lat, oraz tych którzy mają więcej niż 
10 lat. A co z dziesięciolatkami i prawdziwymi przedsz¬ 
kolakami? W przypadku podań a tak ego wieku program 
przechodzi do wersji dla zakresu między 6 i 10 ale 
chyba riie to było celem autora 

Podprogramy dla starszych (linie 380—500) i młod¬ 
szych (linie 250—370) praktycznie me różnią się ni¬ 
czym, prócz parametrów pętli Nie jest więc potrzebne 
umieszczanie ich w programie dwukrotnie Proponuję 
następujące rozwiązanie 

230 IF l<7 then goto 240 

235 IF l<10 then pocz=1 :kon = 10:goto 250 

237 poczd0:kon=20 

240 PRINT ”Jestes za mały”; o$:END 

250 FOR n = pocz TO kon 

Po wprowadzeniu tej zmiany możemy usunąć 
wszystkie linie od numeru 380 w gorę 

# * * 

Myślę, ze moje uwag: przydadzą się me tylko Ro¬ 
bertowi ale i wam wszystkim, Robertowi zas gratuluję i 
zyczę wielu ciekawych pomysłów Tak trzymać 1 

Romek 


10 REM Pogaduszka 
20 REM Robert Witt 
30 CLS 

40 BORDER 0:INK 0.0 
50 INPUT 'Jak masz na iiue":ot 
60 IF RIGHTtfot,l)=“a" THEN 80 
70 IF RIGHTŚiot,l)<>"a" THEN 90 
80 PRINT “Chyba jesteś fajna dziewczyna, 
“:oł:"! 11 GOTO 100 

90 FRINT “Chyba jesteś fajnym chłoocem. 

":ot:"!!!":GOTO 100 

100 FRINT *ft ile masz lat” 

110 INPUT 1 

120 IF 1)80 THEN GOTO 140 

125 IF 1=0 THEN GOTO 140 

126 IF KO THEN GOTO 140 

130 PRINT "Hmm, wyglądasz najwyżej na"ii 
NT(1*0.9);”1at 1 “:GOTO 150 
140 PRINT "Nie wvqłupia_, sie!!:”:GOTO 11 
0 

150 INFUT "Czv chciałbyś sie ze mna uczy 

i 'jpt 

160 IF pt="tak” TREN 210 

170 IF p$="me" THEN 190 

180 IF pl<>“tak" AND p$<)*nie“ THEN 200 

190 PRINT "Jesteś bardzo leniwy'”:tND 

200 FRINT "Nie wiem co to znaczy 1 ”:60T0 

150 

210 PRINT "Podaj iiczbe do mnożenia" 

220 INPUT i 


240 

IF i> 

10 TntN 

GuTG 380 

250 

FOR n 

=1 TO 10 


IgO 

FRINT 

n"t ,! i !! = 

K . 

ł 

270 

INFUT 

w 


280 

IF K= 

nti THEN 

350 

290 

FRINT 

!! ź 1 e 1 J 

es:::e raz:" 

300 

INPUT 

w 


310 

r r* 

ir w= 

nti THEN 

t -r - 

Oj’, 1 

320 

PRINT 

''Jednak 

z matmy jesteś słaby." 

: END 



330 

FRINT 

"No. teraz już dobrze. 3 

340 

r- n 

DU 1 L 

360 


350 

FRINT 

"Bardzo 

dobrze. 3 

360 

NEXT 

n 


370 

F&INT 

"Dałeś 

rade:":END 

380 

F3R n 

=10 TO 2 

0 

390 

FRINT 

n : TT’= 

« . 
a 

400 

INFUT 

w 


410 

IF w= 

nti T HEN 

480 

420 

FRINT 

źle. i 

eszcze raz!" 

430 

INFUT 

w 


440 

IF w= 

nti THEN 

4o0 

450 

FRINT 

"Jednak 

z matmy jesteś słaby. 

: END 



460 

FRINT 

"Nd. te r az już dccrze. 1 

470 

GOTO 

490 


480 

FRINT 

"Wyśmienicie: 13 

490 

NEJiT 

n 


500 

FRINT 

"Bobry 

"estes z tabliczki mnóż 


enia.":END 


230 IF 1)6 AND KIO THEN GOTO 250 


NIE TYLKO KOMPUTERY 


CO PAN NA TO, 

PANIE BELL? 

Dokończenie ze str. 32 

skiem spodni i co umożliwia zdalne odsłucha¬ 
nie nagranych rozmów. Łącząc się z dowolne¬ 
go aparatu ze swoim numerem, po usłyszeniu 
własnej wstępnej zapowiedzi, do mikrofonu 
przytyka się „beeper”. Jego ostry dźwięk prze¬ 
kazany łączami telefonicznymi uruchamia od¬ 
czyt. Jeśli raz jeszcze chcemy przesłuchać zo¬ 
stawione nam wiadomości, „beeper” zrobi 
swoje po raz kolejny. 

Następnym krokiem naprzód jest system 
„pager”. Za przydzielenie dodatkowego nume¬ 
ru „pagera” płaci się dodatkowy miesięczny 
abonament. Ale dla ludzi interesu, których czas 
liczy się sporymi kwotami ma to kolosalne zna¬ 
czenie. Na ciężarówkach poważnych firm, biu¬ 
rach adwokackich, gabinetach lekarskich za 
Atlantykiem wymalowane są, prócz zestawu te¬ 
lefonicznych cyfr, numery „pagerów”. 

Kontakt z lokalną centralą systemu „pager” i 
wywołanie numeru abonenta uruchamia brzę- 
czyk jego „beepera”, który każdy zapobiegliwy 
biznesmen trzyma przy sobie w każdej sytuacji. 
Na plaży, w saunie, podczas gry w golfa. Syg¬ 
nał oznacza, że ktoś nagle próbuje się z nim 
porozumieć. Od jego woli zależy już tylko, jak 
szybko dotrze do najbliższego aparatu, połączy 
z własnym domem, lub centralą „pagerów” i 
dotrze na linii do poszukującej go osoby. Od 
dyżurnego systemu może zażądać treści infor¬ 
macji, albo otrzymać nufrier, z którym należy 
się skontaktować. Już teraz pracuje się nad no¬ 
wymi udogodnieniami. W przyszłości zmodyfi¬ 
kowany „beeper” będzie nie tylko alarmował, 
ale także od razu podawał dane aparatu poszu¬ 
kującego, a nawet przekazaną informację. 

Tyle z autopsji. Amerykański tygodnik „Ne¬ 
wsweek” doniosł niedawno, iż w Stanach Zjed¬ 
noczonych czyni się starania aby wyelimino¬ 
wać zasadniczą wadę systemu „pager” — nie¬ 
wielki zasięg całego układu. Nadajniki radiowe 
transmitujące sygnał alarmu dla posiadacza 
„beepera”, łapią go tylko wówczas, kiedy znaj¬ 
duje się nie dalej niż 20—30 mil (32—48 km) od; 
centrali. A cóż będzie, gdy nasz człowiek inte¬ 
resu wyjedzie poza własne miasto? 

Właśnie o tym pomyślała firma National Sa- 
tellite Communications z Cleveland w stanie 
Ohio. Do pracy zaprzęgnięto, jak się łatwo do¬ 
myślić pojazdy kosmicznej łączności zawie¬ 
szone nad USA. Za sumę od 45 do 70 dolarów 
amerykańskich miesięcznie klient otrzymuje 
bardzo, bardzo wymyślny „beeper” — czarne 
pudełeczko o masie dwóch uncji. Zabiera je ze 
sobą w każdą podróż po Stanach Zjednoczo¬ 
nych i bliskiej zagranicy. 

Ktoś chcący naradzić się z ruchliwym biz¬ 
nesmenem łączy się... za darmo z numerem 
sztabu komputerowego systemu w Waszyngto¬ 
nie, wybiera następnie klawiszami własnego 
aparatu kod delikwenta i przekazuje wiado-j 
mość. Resztą zajmuje się elektronika. Sygnał 
trafia do satelity, a dalej do sieci małych emite¬ 
rów naziemnych pokrywających swym zasię¬ 
giem-całe USA. Na 200 kanałach „beeper” auto¬ 
matycznie wyszuka najsilniejszy sygnał. Czę¬ 
stotliwości są tak dobrane, iż czarna skrzyne¬ 
czka odbierze i pokaże swemu właścicielowi 
numer tego, kto pragnie się porozumieć (może 
przyjąć jednocześnie do 6 różnych zgłoszeń z 
różnych rejonów kraju). To usługi podstawowe 
tego, co w całości nosi nazwę Cue. 

Za dodatkową opłatą abonent Cue nie potrze¬ 
buje się łączyć z tym, który wysłał telefoniczny 
„news”. Dzwoni jedynie do centrum w Waszyn¬ 
gtonie, a komputer modulowanym głosem 
przekazuje mu oczekiwaną informację. I ten ra¬ 
chunek telefoniczny wędruje na konto Cue. Je¬ 
dynie rozmowy zagraniczne obciążają dzwo¬ 
niącego. 

Ale to nie koniec. Już teraz, gdy Cue dopiero 
się rodzi pomyślano o dwóch kierunkach roz¬ 
woju. Dwóch celach przyszłościowych. Pierw¬ 
szy to przekazywanie od razu „beeperowi” gło¬ 
su z telefonu poszukującego kontaktu. A drugi 
to rozszerzenie usług na cały... glob. 


Wojciech Łuczak 












NIE TYLKO KOMPUTERY 


Z niezwykle prostym wynala¬ 
zkiem Grahama Bella zrobiono 
już prawie wszystko. Zaczęło 


Ale kiedy na scenę wkroczyły 
automatyczne centrale, pod¬ 
morskie kable, zaprzestano do¬ 
wcipów. Telefon stał się pod¬ 
stawowym narzędziem robienia 
nteresów. 


Dziś zwoje miedzi ułożone wewnątrz grube¬ 
go, niczyfh udo mężczyzny, kabla, pieczołowi¬ 
cie umieszczone kilka kilometrów pod lustrem 
oceanu to już jedynie przeszłość techniki. Dziś 
miedź ustępuje pola światłowodom, a słowa 
wypowiedziane gdzieś w londyńskiej budce te¬ 
lefonicznej, nim trafią powiedzmy do Tokio, czy 
Los Angeles, dotrą do satelity zawieszonego 


na orbicie i w mgnieniu oka pokonają w kosmc 
sie dystans, który poprzednio przebywać mu¬ 
siały po dnie oceanu. Dziś większość cywilizo 


wanego świata uważa posiadanie sprawnego 
systemu umożliwiającego błyskawiczny kon¬ 
takt praktycznie z każdym punktem kuli ziems¬ 
kiej, za coś tak normalnego, jak widok mydła w 
łazience. Niestety nie należymy do tej większo¬ 
ści, przyjrzyjmy się więc, jak w rękach innych 
działa coraz doskonalszy telefon. Bo to prze¬ 
cież wielce pouczające. 

Zacznijmy od prostego mariażu mikroproce¬ 
sora z nieco tylko uwspółcześnionym wynalaz¬ 
kiem Bella. Taki właśnie aparat, choć trefnisie 
mogliby go określić jako „szkocką machinę”, 
zobaczyłem po raz pięrwszy na początku lat 
siedemdziesiątych w Środkowej Anglii. Kiedy 
nikt się nim nie posługiwał, podawał wyłącznie 
czas. Każde połączenie wywoływało jednak re- 


systemu umożliwiającego błyskawiczny kon 


kiej, za coś tak normalnego, jak widok mydła 


Właściciele małych, kilkuosobowych przed¬ 
siębiorstw reklamujących się w codziennych 
gazetach, bądź zarejestrowani w Iprofesjonal- 
nych książkach telefonicznych usługodawców 
— „yeilow pages” nie wyobrażają sobie pracy 
bez rejestratora telefonicznych zgłoszeń. Właś¬ 
nie dla nicłr wymyślono bardziej doskonałą od- 


cenę. W Kanadzie w sklepie sieci Radio Shack 
podstawowy model „odbieracza telefonów” ko¬ 
sztuje około 200 tamtejszych dolarow. Jego 
serce tworzą dwa magnetofony kasetowe. Na 
pierwszym nagrywa się tekst audiowizytówki, 
w rodzaju: „Cześć, nie ma mnie w domu... po 
usłyszeniu sygnału zostaw swój numer telefo¬ 
nu i wiadomość” (regulowana jest liczba dzwo¬ 
nków, po której do akcji wchodzi automat). 
Drugi rejestruje zgłoszenia. Po dłuższej, czy 
krótszej nieobecności, w rodzinach kanadyjs¬ 
kich, które obserwowałem, pierwsze kroki kie¬ 
rowane są właśnie w stronę urządzenia zapisu¬ 
jącego telefony. 


mianę „odpowiadaczy” droższą o około sto do¬ 
larów od wariantu „Standard”. 

Za tę sumę prócz pudełeczka z magnetofona¬ 
mi połączonego z telefonem kupuje się jeszcze 


„beeper”, czyli coś, co nosi się zatknięte za pa 
Dokończenie na str. 31 


CO PAN NATO, 








